so sieht mein quelltext aus :
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
VAR e: INTEGER;
begin
e := ShellExecute
(
Handle,
NIL,
PCHAR('
C:\Dokumente und Einstellungen\Administrator\Desktop\Handyalarm\test.BAT'),
PCHAR('
'),
NIL,
SW_SHOW);
IF (e<=32)
THEN
begin
ShowMessage('
Fehler: Batch-Datei konnte nicht ausgeführt werden!')
end
end;
end.
so wie mache ich das jetzt, das eine logdateigeschrieben wird sobald ein button gedrückt wird
[edit=Matze]Du wurdest schon darauf hingewiesen, die [delphi]-Tags zu nutzen. Dann verwende diese zukünftig bitte auch. Ich habe sie ausnahmsweise für dich eingefügt.
Noch ein Hinweis: Verwende weniger Leerzeilen im Code, dann wird er deutlich übersichtlicher. MfG, Matze[/edit]