Hallo Leute,
ich habe gerade von einem Bentzer einen Fehlerbildschirm zugeschickt gekommen. Wenn der Benutzer wie angedeutet auf diese Button klickt wird die Funktion aufgerufen:
Delphi-Quellcode:
unit UForm;
...
procedure TUForm.UBTN_StartClick(Sender: TObject);
begin
ProgrammAusfuehren(MyTBUA.Pfad+'
tbupdate.exe','
',Application.handle);
end;
...
unit MyFunctions;
...
procedure ProgrammAusfuehren(prog, params:
string; HandleNow: HWND);
begin
ShellExecute(HandleNow, '
open', PChar(prog), PChar(params),
nil, SW_NORMAL);
end;
http://tbupdate.ecerberus.de/screenshoot_00030.gif
Der Fehler ist bisher bei einem Bnutzer aufgetreten - bei anderen Nutzern funktioniert dies alles ohne Probleme. Hab schon nach dem
OS gefragt - Feedback steht aus. Aber Grundsätzlich, wo kann da der Fehler liegen?
Grüße,
PremiumPils