Einzelnen Beitrag anzeigen

Dr. Jack

Registriert seit: 17. Mär 2010
78 Beiträge
 
Delphi 10.2 Tokyo Architect
 
#1

Bereitstellung einer Datenbank/ Select geht nicht

  Alt 24. Feb 2019, 17:05
Hallo zusammen,

ich versuche eine kleine SQLite DB über den Bereitstellungsmanager ins Smartphone zu bekommen.
Leider verzweifele ich hier.
Die Datei habe ich zugefügt \assets\iternal\. Ein simples Connect wird ausgeführt (er ist auch tatsächlich verbunden)

Code:
if apms_conn.Connected=true
then begin
        showmessage('Verbindung steht');
     end
else begin
       showmessage('Verbindung nicht hergestellt, verbinde...') ;
       apms_conn.Connected:=true;
     end;
aber die folgende Kleinigkeit endet mit: "NO such table:Benutzer."
Aber der Code wird mit derselben DB in der Desktop-Version ohne Probleme ausgeführt.
Code:
procedure Tlogin_form.Button1Click(Sender: TObject);

begin
 listbox1.Items.Clear;
 FDQuery_select.FetchOptions.AutoClose := False;
 FDQuery_select.SQL.Clear;

 FDQuery_select.SQL.Add('SELECT *');
 FDQuery_select.SQL.Add('FROM benutzer');

 FDQuery_select.SQL.Add('ORDER BY nachname')      ;
 }FDQuery_select.Open;

 while not FDQuery_select.Eof do
     begin
        lade_daten( FDQuery_select.fieldbyname('id').asString, FDQuery_select.fieldbyname('vorname').asString, FDQuery_select.fieldbyname('nachname').asString, FDQuery_select.fieldbyname('berufsbez').asString );

        FDQuery_select.Next;



 end;
Das before connect liefert auch den richtigen Pfad, meine ich.
Code:
 apms_conn.Params.Values['Database'] :=
    TPath.Combine(TPath.GetDocumentsPath, 'apm_data.db');
  //     showmessage(apms_conn.Params.Values['Database']);
Was kann ich machen?

Geändert von Dr. Jack (24. Feb 2019 um 17:52 Uhr)
  Mit Zitat antworten Zitat