Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#26

AW: Info-Fenster von Windows anzeigen

  Alt 18. Aug 2015, 09:22
Du sagst, mann muss bei den Delphi-Versionen aufpassen, ...
Wo soll ich das denn gesagt haben?
Uppps, ich glaube ich habe da den Kontext deiner Beanstandung verwechselt. Du hast dich wohl auf den Beitrag
Parameter von WINVER.exe gibt es bis WIN8.1 nicht.

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var strParams,FN : String;
begin // uses Winapi.ShellAPI
 strParams:= ''; // für Programme MIT Parameter
 FN:='winver.exe';
ShellExecute(Application.Handle,NIL,PWChar(FN), PWChar(strParams),NIL, SW_Normal);
end;
bezogen, und das ist definitiv falsch, womit du natürlich recht hast.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var strParams,FN : String;
begin // uses Winapi.ShellAPI
 strParams:= ''; // für Programme MIT Parameter
 FN:='winver.exe';
ShellExecute( Application.Handle, NIL, {PWChar ist hier FALSCH}PChar(FN), {PWChar}PChar(strParams), NIL, SW_Normal );
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat