Forum: Sonstige Fragen zu Delphi
Delphi
by thomasdrewermann,
17. Jun 2002
Hi m-werk,
funztz jetzt? :?:
Forum: Sonstige Fragen zu Delphi
Delphi
by thomasdrewermann,
15. Jun 2002
Also nochmal :D :
procedure TForm1.FormCreate(Sender: TObject);
var OK: Boolean;
reg:tregistry;
a:integer;
serial:string;
begin
REG := TRegistry.Create;
try
Forum: Sonstige Fragen zu Delphi
Delphi
by thomasdrewermann,
15. Jun 2002
Ein formatierter Code für Luckie :wink: :
procedure TForm1.FormCreate(Sender: TObject);
var OK: Boolean;
reg:tregistry;
a:integer;
serial:string;
begin
REG := TRegistry.Create;
Forum: Sonstige Fragen zu Delphi
Delphi
by thomasdrewermann,
15. Jun 2002
Hier noch mal ein konkreter Code:
procedure TForm1.FormCreate(Sender: TObject);
var OK: Boolean;
reg:tregistry;
a:integer;
serial:string;
begin
REG := TRegistry.Create;
try
Forum: Sonstige Fragen zu Delphi
Delphi
by thomasdrewermann,
15. Jun 2002
procedure TForm1.FormCreate(Sender: TObject);
var OK: Boolean;
reg:tregistry;
a:integer;
serial:string;
begin
REG := TRegistry.Create;
try
try
Forum: Sonstige Fragen zu Delphi
Delphi
by thomasdrewermann,
14. Jun 2002
Ich hab die Überprüfung auch noch eingebaut:
procedure TForm1.FormCreate(Sender: TObject);
var OK: Boolean;
reg:tregistry;
a:integer;
begin
REG := TRegistry.Create;
try
try
Forum: Sonstige Fragen zu Delphi
Delphi
by thomasdrewermann,
14. Jun 2002
Also bei mir klappts mit dem Code :D
procedure TForm1.FormCreate(Sender: TObject);
var OK: Boolean;
reg:tregistry;
a:integer;
begin
REG := TRegistry.Create;
try