ich habe ein Programm entwickelt, welches auf einem RaspberryPi laufen und beim Booten automatisch gestartet werden soll.
Das Programm ist ein Desktopanwendung.
Für den Autostart habe ich in "~/.config/autostart/" eine Datei "kasse.desktop" angelegt.
Code: Alles auswählen
[Desktop Entry]
Name=Kasse
Comment="simple Cashdesk"
Type=Application
Path=/home/pi/Projekte/Kasse/
Exec=/home/pi/Projekte/Kasse/Registrierkasse
#Terminal=false
mein Programm wird nun auch nach dem Booten gestartet aber meine .json-Datein werden nicht gefunden. Die Fehlermeldung lautet:
Die Dateien liegen aber im angegebenen Pfad:
was mache ich falsch?
Code: Alles auswählen
//-----------------------------------------------------------------------------
procedure TKasse.FormCreate(Sender: TObject);
//-----------------------------------------------------------------------------
var i : Integer;
json, jsonArticles, jsonArticle : TJSONData;
jsonContent : String;
Content : String;
jsonFile : TEXT;
begin
self.lbVersion.Caption := 'Version: ' + VERSION;
// Read json-file.
AssignFile(jsonFile, 'asset/articles.json');
try
Reset(jsonFile);
while not eof(jsonFile) do begin
Readln(jsonFile, Content);
jsonContent := jsonContent + Content;
end;
CloseFile(jsonFile);
except
on E: EInOutError do begin
Application.MessageBox(
PChar(
'Die Datei "' +
ExtractFilePath(ParamStr(0)) +
'asset/articles.json" konnte nicht gelden werden.'
),
'Schwerwiegender Fehler', MB_ICONASTERISK + MB_OK);
Rewrite(jsonFile);
CloseFile(jsonFile);
end;
end;
...