Материалдар, сатып алынатын өнімдер жартылай фабрикат өнімдеріне шығатын шығын мөлшерін есептеу
Курсовая работа, 11 Марта 2012, автор: пользователь скрыл имя
Краткое описание
Өндірісте, ауыл шаруашылығы мен оқу орындарында, коммерциялық мекемелерде және тағыда басқада салаларда түрлі берілгендерді дайындау, оларды өңдеу, сақтау жиі кездеседі. Мысалы, жоғарғы оқу орындарында дайындалатын мәліметтер:
- түрлі бөлімдерде жұмыс істейтін адамдардың тізімі(фамилиясы, аты, білімі, адресі, үй телефоны, тағыда басқа.;
-факультеттер,олардың құрамындағы кафедралар мен кафедра қызметкерлерінің тізімдері;
- студенттер жөнінде мәліметтік тізімдер, тағы да басқа.
Содержание работы
КІРІСПЕ......................................................................................................................3
І БӨЛІМ. БАҒДАРЛАМАЛАУ ОРТАСЫ ЖӘНЕ ТІЛДІҢ ОРТАСЫ ЖӘНЕ ТІЛДІҢ ЭЛЕМЕНТТЕРІНЕ ШОЛУ
1.1. Мәліметтер қоры................................................................................................5
1.2. Бағдарламалау тілін таңдау және оның ерекшеліктері..............................9
1.3. Delphi ортасында мәліметтер қорын құрастыру жолдары.......................20
1.4. Кестеде деректерді пайдалануда SQL-мен жұмыс.......................................28
ІІ БӨЛІМ. МӘЛІМЕТТЕР БАЗАСЫН DELPHI ОРТАСЫНДА ЖОБАЛАУ
2.1. DELPHI ортасында өңделетін процедуралар мен функцияларды сипаттау.....................................................................................................................35
2.2. Тапсырманың қойылымы..............................................................................36
ІІІ БӨЛІМ. ДИПЛОМДЫҚ ЖОБАНЫҢ ЭКОНОМИКАЛЫҚ ТИІМДІЛІГІН ЕСЕПТЕУ
3.1.Жобаны дайындау барысын есептеу.............................................................39
3.2.Материалдар, сатып алынатын өнімдер жартылай фабрикат өнімдеріне шығатын шығын мөлшерін есептеу....................................................................39
3.3. Негізгі еңбекақыны есептеу...........................................................................39
3. 4. Қосымша еңбекақыны есептеу.....................................................................40
3.5. Жүкқұжат шығындарды есептеу.................................................................40
3.6. Келісім баға бойынша жобаны есептеу........................................................41
ҚОРЫТЫНДЫ........................................................................................................42
ПАЙДАЛАНЫЛҒАН ӘДЕБИЕТТЕР..................................................................44
ҚОСЫМША..............................................................
Содержимое работы - 1 файл
Абдрахманов Берік.doc
— 563.00 Кб (Скачать файл)Edit1: TEdit;
Button1: TButton;
Button2: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form6: TForm6;
implementation
{$R *.dfm}
end.
unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, FileCtrl;
type
TForm7 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Edit1: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Edit5: TEdit;
Button1: TButton;
Button2: TButton;
FontDialog1: TFontDialog;
Image1: TImage;
OpenDialog1: TOpenDialog;
Image2: TImage;
procedure Button2Click(Sender: TObject);
procedure Image2Click(Sender: TObject);
procedure Image1Click(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form7: TForm7;
implementation
uses Ptel;
{$R *.dfm}
procedure TForm7.Button2Click(Sender: TObject);
begin
if edit4.text<>edit5.Text
then begin
showmessage('пороль сәйкес келмейді');
end
else begin
// Өңдеулерді сақтау
nastroiki.pass1:=edit4.text;
nastroiki.pass2:=edit5.text;
nastroiki.f1:=edit3.Text;
nastroiki.fonts:=fontdialog1.
assignfile(f1,currdir+'/
rewrite(f1);
write(f1,nastroiki);
closefile(f1);
form7.Close;
end;
end;
procedure TForm7.Image2Click(Sender: TObject);
begin
Opendialog1.Execute;
edit3.Text:=opendialog1.
end;
procedure TForm7.Image1Click(Sender: TObject);
begin
fontdialog1.Execute;
edit1.Text:=fontdialog1.Font.
end;
procedure TForm7.FormShow(Sender: TObject);
begin
// өңдеулерді шақырып, бетке енгіземіз
edit1.Text:=nastroiki.fonts.
edit3.Text:=Nastroiki.f1;
edit4.Text:=Nastroiki.pass1;
Edit5.Text:=Nastroiki.pass2;
end;
procedure TForm7.Button1Click(Sender: TObject);
begin
form7.Close;
end;
end.
3