Thema: Delphi String -> Word

Einzelnen Beitrag anzeigen

TheAn00bis

Registriert seit: 7. Jun 2004
386 Beiträge
 
#6

Re: String -> Word

  Alt 17. Jun 2006, 14:25
Die Idee mit der Datei gefällt mir.

Aber mir fällt gerade ein, dass es mir eigentlich auch reichen würde statt dem "Virtual Keycode" einfach die Zahl der Konstanten als Parameter zu übergeben: Also ich übergebe dem Programm die Zahl "173" (=VK_VOLUME_MUTE) und es schaltet auf Mute.
So ist das Programm dynamisch und ich muss nur die Zahlen der Konstanten vorher herausfinden.

So funktioniert das wunderbar:
Delphi-Quellcode:
procedure TForm1.FormActivate(Sender: TObject);

  function filter(pString: String): String; //entfernt den Bindestrich vor dem Parameter
  begin
    result := copy(pString,2,length(pString));
  end;

begin
 PostKeyEx32(strtoint(filter(ParamStr(1))) , [], False); //siehe [url]http://www.swissdelphicenter.ch/de/showcode.php?id=220[/url]
 close;
end;
Danke euch!

Edit: Man sollte das "close" nicht sofort danach ausführen, sonst funktioniert es nicht.
  Mit Zitat antworten Zitat