Проект файлы

program Zast_p;

uses

Forms,

Main in 'Main.pas' (fmMаin),
Zast in 'Zast.pas' (fmZast};
{SR *.res}

begin

Application. Initialize;

tmZast: =TfmZast.Create(Application); { заставка-формасын қ ұ ру жә не

бейнелеу }

fmZast.Show; fmZast.Update;

Application.CreateForm(TfmMain, fmMain); {Қ осымшаның негізгі

формасын қ ұ ру}

fmZast.Hide; fmZast.Free; { Заставка формасын жою }

Application.Run;

end.

FmMain негізгі формасының модулінің файлы

Unit Main;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;

type

TfmMain=class(TForm)

procedure FormCreate(Sender: TObject);

private {Private declarations } public { Public declarations }

end;

var fmMain: TfmMain;

implementation

{$R*.dfm}

procedure TfmMain.FormCreate(Sender: TObject);

var t: longint;

begin t: =GetTickCount div 1000; while (GetTickCount div 1000)< t+5 do; end;

end.

Заставка-формасының модулінің файлы

unit Zast;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls;

type..

TfmZast = class(TForm)

Image1: TImage;

procedure FormCreatе(Sender: TObject);

private { Private declarations } public { Public declarations }

end;

var fmZast: TfmZast;

implementation

{$R*.dfm}

procedure TfmZast.FormCreate(Sender: TObject);

begin

fmZast.Position: =poScreenCenter;

fmZast. Form Style: =fsStayOnTop; fmZast.Caption: =";

fmZast.BorderStyle: =bsNone; fmZast.BorderIcons: =[ ];

Image1Align: =alLeft; Image1.Stretch: =true;

Image1.Width: =fmZast.ClientWidth div 2;

end; end.

Ескерту: Заставка формасының OnCreate оқ иғ асында жазылғ ан командаларды Объектілер инспекторы терезесі арқ ылы орындағ ан ың ғ айлы.

Ә дебиеттер

1. Баженова И.Ю. Delphi 6. Самоучитель программиста. – М: Кудиц-образ, 2002.

2. Глушаков С.В., Клевцов А.Л. Программирование в среде Delphi 7. – Харьков ФОЛИО, 2003.

3. Культин Н. Delphi в задачах и примерах. – СПб.: БХВ – Санкт-Петербург, 2004.

4. Гофман В., Хомоненко А. Delphi 5. – СПб.: БХВ – Санкт-Петербург, 2000.

5. Ерекешева М.М., Ә мірғ алиева Т.А. Delphi ортасында программалау негіздері. Қ. Жұ банов ат. АМУ, 2005.

6. Симонович С.В., Евсеев Г.А. Занимательное программирование: Delphi. – М: Аст-Пресс Книга, 2001.

7. Абрамов С.А., Гнездилова Г.Г., Капустина Е.Н., Селюн М.И. Задачи по программированию. – М., Наука, 1988.

8. Епанешников А., Епанешников В. Программирование в среде Turbo Pascal 7.0. М., Диалог-Мифи, 1993.

9. Острейковский В.А. Информатика. – М: Выс. шк., 2001.

10. Фаронов В.В. Турбо Паскаль 7.0. Начальный курс. М., Нолидж, 1997.

11. Фаронов В.В. Турбо Паскаль 7.0. Практика программирования. М., Нолидж, 1997.