Einzelnen Beitrag anzeigen

Benutzerbild von arbu man
arbu man

Registriert seit: 3. Nov 2004
Ort: Krefeld
1.108 Beiträge
 
Delphi 7 Professional
 
#3

Re: Erster Screensaver: FensterXP

  Alt 3. Feb 2005, 16:35
Beim Klick in Windows wird nicht nur /C übergeben sordern auch noch ein zahlencode (immer ein anderer) folgender Code sorgt dafür das das Info Fenster auch von Windows zu erreichen ist
Delphi-Quellcode:
If ParamCount>0 Then begin
  s:=ParamStr(1);
  s:=copy(s,2,1);
  if (s='c')or(s='C') then begin
    application.ShowMainForm:=false;
    forminfo.Show;
    screen.Cursor:=crDefault;
  end;
end;
Björn
>> http://bsnx.net <<
Virtual DP Stammtisch v1.0"iw" am 19.09.2007 - ich war dabei!
  Mit Zitat antworten Zitat