ҚОСЫМША В
Авторлар туралы мағұлыматты беру коды.
unit HelpUnit;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, jpeg, ExtCtrls;
type
THelpForm = class(TForm)
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
HelpForm: THelpForm;
implementation
{$R *.dfm}
procedure THelpForm.Button1Click(Sender: TObject);
begin
close;
end;
end.
Енді негізгі проектімнің формаларын көрсетіп кетейік. Жоғарыда айтқанымдай менің бағдарламам үш формадан тұрады.
Біріншісі пароль беру және негізгі бағдарламаға кіру формасы.
Е
кіншісі негізгі бағдарлама меню формасы.
Үшіншісі мәліметтер қорының формасы.
Төртіншісі авторлар туралы мәліметтер формасы.
Достарыңызбен бөлісу: |
