jj pozrel som si ho
Příspěvky odeslané z IP adresy 78.98.120.–
Tu to máš - také ľahké hodiny
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
Label1: TLabel;
Timer1: TTimer;
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption:= TimeToStr(Time);
end;
end.
Pokud chceš zavřít celou aplikaci - Application.Terminate;
pokud chceš zavřít formulár - Form(číslo).Close;
pokud chceš zneviditelnit formulár - Form(číslo).Visible:=False;
pokud chceš zviditelnit formular - Form(číslo).Visible:=True;
A pokud chceš vytvořit formulár za běhu aplikace tak zkus toto:
Procedure TForm1.Button1Click(Sender: TObject);
begin
if Form2 = nil then
Form2 := TForm2.Create(Self);
Form2.Show;
end;
Unit Unit1;
...
procedure TForm1.Button2Click(Sender: TObject);
begin
Self.Close;
end;
Presne delphak, Nevíte mi (jsem jeho bratr) nekdo poradit?
Ja by som ti radil Delphi lebo je to grafický jazyk a programovanie je podobne ako Pascal lebo delphi je vlastne Object PASCAL. A ja som sa začal učiť v delphi len asi pred mesiacom a teraz programujem ako ten ktrí sa dva roky venuje C++.
ale ja nevím co je to API
já bychom chtel vedět príkaz pro vypnutí počítače v delphi. dekuji