Chcę żeby program reagował na pierwsze uruchomienie, a potem żeby (prz uruchamianiu) nic nie żądał.Czy można to zrobić opierając się na TRegistry (if keyexist)??--DELPHIRULEZ
0
0
Pewnie ze mozna , wiesz jak a sie pytasz ;)
procedure TMainForm.FormCreate(Sender: TObject);
var
Reg : TRegistry;
KeyExists : Boolean;
begin
Reg := TRegistry.Create;
try
KeyExists := Reg.OpenKey('Software\RegApp', False); * otworz klucz
if not KeyExists then
begin
*kod wykonywany przy pierwszym uruchomieniu
end;
finally
Reg.Free;
end;
end;
http://www.4programmers.net/delphi/rejestry.html
--Pozdrawiam {hello}
Tomasz K.
0
Tak!
Teraz nie mam czasu {hello} --Sebo +)
(D3)
0
0
100krotne senks.oadam czy dziala, a za pomoc stawiam {browar} --DELPHIRULEZ