Реферат Порівняльний аналіз мов програмування

sl=8 then Panel1.Caption:= 1000 raquo ;; sl=9 then Panel1.Caption:= 0 raquo ;; sl=10 then Panel1.Caption:= 450 raquo ;; sl=11 then Panel1.Caption:= 50 raquo ;; sl=12 then Panel1.Caption: = 750 raquo ;; sl=13 then Panel1.Caption:= 650 raquo ;; sl=14 then Panel1.Caption:= 600 raquo ;; sl=15 then Panel1.Caption:= 150 raquo ;; sl= 16 then Panel1.Caption:= 400 raquo ;;;

procedure TForm6.Button2Click (Sender: TObject);

begin.Enabled:=false; .Enabled:=false; .Enabled:=true ;;

procedure TForm6.FormShow (Sender: TObject);

begin.Enabled:=true; .Enabled:=true; .Enabled:=false ;;.

Приклад форми виграшу поразки ;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms ,, StdCtrls, jpeg, ExtCtrls;=class (TForm): TImage ;: TLabel ;: TLabel;:TButton ;: TButton; Button1Click (Sender: TObject); Button2Click (Sender: TObject);

{Private declarations}

{Public declarations} ;: TForm9;

implementation

{$ R * .dfm} TForm9.Button1Click (Sender: TObject);

begin.Terminate ;;

procedure TForm9.Button2Click (Sender: TObject);

begin.Terminate; (GetCommandLine, SW_SHOWNORMAL) ;. Spros ;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms ,, StdCtrls;=class (TForm): TLabel ;: TButton;:TButton; Button1Click (Sender: TObject); Button3Click (Sender: TObject);

{Private declarations}

{Public declarations} ;: TForm11 ;: PChar;

uses Zastavka;

{$ R * .dfm} TForm11.Button1Click (Sender: TObject);

begin.Terminate () ;;

procedure TForm11.Button3Click (Sender: TObject);

begin.Terminate; (GetCommandLine, SW_SHOWNORMAL);.