@Venice2
Danke für Deine Hilfe Venice2
Das mit den $Region´s kannte ich noch gar nicht.
Tolles Feature um den Quelltext lesbarer (zusammmenklappbar über mehrere Proceduren) zu machen.
Die procedure InitPath verwirrt mich etwas. Die beiden If/else Zweige führen den gleichen Befehl aus, habe ich da etwas übersehen ?
Möglicherweise ein Überbleibsel aus einer Zeit als TiniFile.Create noch nicht automatisch die Ini-Datei angelegt hat?
Code:
procedure InitPath;
begin
UserAppDataDir := GetSpecialFolder(CSIDL_APPDATA);
if FileExists(UserAppDataDir + '\BrewIdeas\Bounce' + '\Bounce.ini') then
BounceIni := TIniFile.Create(UserAppDataDir + '\BrewIdeas\Bounce' + '\Bounce.ini')
else
BounceIni := TIniFile.Create(UserAppDataDir + '\BrewIdeas\Bounce' + '\Bounce.ini');
end;
Hast Du irgend eine Art von Dokumentation zu den wichtigsten Befehle der SKAeroAPI.
Der SourceCode ist schon gut Dokumentiert.
Sonst schreib ich mir dazu etwas um leichter die
API verwenden und erklären zu können.
Das verwende ich dann für die Stufe 2 des Ball Projektes für meine Praktikanten.
Das Projekt lässt sich nicht compilieren, da er die
Unit Graphics nicht findet, da du da scheinbar deine eigene Graphics.pas benutzt hast um die
VCL zu umgehen, nehme ich an.
Was muss dafür noch eingestellt werden im Compiler?
Ist die SKAeroAPI überhaupt dabei? Habe im .pas File eigentlich nur Procedure-Definitionen gesehen, braucht man da noch eine .dcu dazu, die nicht mitgeliefert ist?