Windows API in FreePascal

[JayK]

Hallo,
wie kann ich die Windows-API in Free Pascal benutzen?
Ich was für einer Unit oder so stehen die denn?
Die FPC-Hilfe finde ich generell recht dürfig

Schonmal Danke im voraus,
JayK

[Interceptor]

Die WinAPI steht in keiner Unit drin, sie ist Bestandteil deines Windows-Betriebssystems. Wenn sie es tun würde, dann würde diese Unit lediglich als Wrapper fungieren.

In FreePascal sollte die WinAPI genauso ansprechbar sein wie in Delphi.

[JayK]

Wenn ich in Freepascal ein Programm habe, wo folgendes drinsteht:

Delphi-Quellcode:

program RIC;

{$APPTYPE Console}

uses
  Windows;

begin
  WriteLn('Aktualisiere Icon Cache...');
  try
    SHChangeNotify(SCHNE_ASSOSCHANGED, SHCNF_IDLIST, nil, nil);
  except
    WriteLn('Fehler beim Aktualisieren!');
end;
end.

dann kommt als Fehlermeldung:

Zitat von FPC:

Error: Identifier not found "SHCNE_ASSOCCHANGED"
Error: Identifier not found "SHCNF_IDLIST"

[Luckie]

Dann wird das in der Unit Window snicht deklariert sein und du wirst es dir selbst deklarieren müssen. Allerdings bräuchstest du dann die nötigen C-Header-Dateien. Die sind entweder beim PSDK dabei oder beim VC.

[JayK]

Zitat von Luckie:

Dann wird das in der Unit Window snicht deklariert sein und du wirst es dir selbst deklarieren müssen. Allerdings bräuchstest du dann die nötigen C-Header-Dateien. Die sind entweder beim PSDK dabei oder beim VC.

Das ist ja doof kann es nich sein, dass die in einer Anderen Unit drinstehen? (bitte, bitte!)

[mirage228]

Hi,

für SHChangeNotify brauchst Du imho die Units ShellAPI und/oder ShlObj

mfG
mirage228

[JayK]

Zitat von mirage228:

für SHChangeNotify brauchst Du imho die Units ShellAPI und/oder ShlObj

Schon klar, unter Delphi
Aber wie bindet man deren Äquivalente unter FP ein? Im Ordner Units gibbet zwei Dateien im Unterverzeichnis WinUnits glaub ich, die heißen: shellapi.o und shlobj.o
Aber was kann wer schon mit o-Dateien Anfangen

PS. woher hast du den [oh]-Tag? Für die Delphi-Hilfe?

[JayK]

Ich habe mir jetzt diese beiden API-Variablen (Die Prozendur kannte er ja dann wieder ) herbeigeschummelt: Ich habs in Delphi geproggt und die Variablen dort per ShowMessage() ausgeben lassen (IntToStr(APIVariable)). Das ist aber ziemlich Umständlich für jede einzelne API-Variable ...
Oder ich müsste mir 'ne Unit als Sammlung schreiben
Muss ich noch die Option "Bibliothekspfade" oder sowas in Freepascal suchen.

Naaaaaa toll!!!

Grüße,
JayK

[Chewie]

Nimm doch mal die WInAPI-Übersetzungen der Jedis her. Jag sie durch den Compiler und änder evtl. das, was sich compilieren lässt, ab.

[Olli]

Zitat von Chewie:

Nimm doch mal die WInAPI-Übersetzungen der Jedis her. Jag sie durch den Compiler und änder evtl. das, was sich compilieren lässt, ab.

Wir sind gerade dabei FPC-Kompatibilität herzustellen. Es ist aber garantiert noch nicht komplett kompatibel.

http://sourceforge.net/projects/jedi-apilib/