AW: Joblist - Aufgabenplaner
Zitat:
|
AW: Joblist - Aufgabenplaner
Zitat:
Delphi-Quellcode:
// procedure aufrufen
LoadJobslistByStart(True, ListView1); |
AW: Joblist - Aufgabenplaner
Zitat:
|
AW: Joblist - Aufgabenplaner
ok ))
|
AW: Joblist - Aufgabenplaner
Du verwendest in der Prozedur auch immer
Code:
.
ListView1
Du musst
Code:
verwenden, da so der Übergabeparameter/Variable heißt.
aListView
|
AW: Joblist - Aufgabenplaner
Zitat:
Mache jetzt noch die selber Geschichte für's Suchen und dann ist wohl alles ok bei mir, oder gibt's noch Vorschläge bzw. Kritik? |
AW: Joblist - Aufgabenplaner
Ich nutze hier mehrere Querys (SQLQuery1 und SQLQueryCategory), wäre es auch nur mit einem gegangen?
Delphi-Quellcode:
// -------------------------- Category ---------------------------------------
// Kategorie leer if CategoryComboBox.Text = '' then begin Form1.SQLQuery1.ParamByName('fk_category_id').Clear; end else if (CategoryComboBox.Items.IndexOf(CategoryComboBox.Text) = -1) and (CategoryComboBox.Text <> '') then begin // Kategorie nicht vorhanden, also neue Kategorie in die DB schreiben Form1.SQLQueryCategory.Close; Form1.SQLQueryCategory.SQL.Text := 'INSERT INTO tbcategory VALUES(NULL, :category)'; Form1.SQLQueryCategory.ParamByName('category').AsString := CategoryComboBox.Text; Form1.SQLQueryCategory.ExecSQL; Form1.SQLTransaction1.Commit; // Die letzte ID auslesen Form1.SQLQueryCategory.Close; Form1.SQLQueryCategory.SQL.Text := 'SELECT last_insert_rowid() as id_tbcategory FROM tbcategory'; Form1.SQLQueryCategory.Open; CategoryLastID := Form1.SQLQueryCategory.FieldByName('id_tbcategory').AsInteger; Form1.SQLQuery1.ParamByName('fk_category_id').AsInteger := CategoryLastID; end else if CategoryComboBox.Items.IndexOf(CategoryComboBox.Text) >= 0 then begin // String in der CB vorhanden, ID zuweisen Form1.SQLQuery1.ParamByName('fk_category_id').AsInteger := Integer(CategoryComboBox.Items.Objects[CategoryComboBox.Items.IndexOf(CategoryComboBox.Text)]); end; // -------------------------- Ende Category ---------------------------------- Form1.SQLQuery1.ExecSQL; Form1.SQLTransaction1.Commit; |
AW: Joblist - Aufgabenplaner
Ich lasse jetzt die Anwendung mit Windows mithilfe der Registry starten, aber das Prog will bei dem Autostart die DB nicht laden, es kommt der Fehler:
Code:
Hat jemand eine Idee wieso das passiert? Ich verstehe nicht was der Unterschied ist wenn ich die Anwendung manuell ausführe, oder das System macht das... hm... komisch.
EDatabaseError
SQLite3Connection1: unable to open database file |
AW: Joblist - Aufgabenplaner
Möglicherweise ist die Datenbank noch nicht verfügbar oder die Anwendung wird in einem anderen Benutzerkontext gestartet
|
AW: Joblist - Aufgabenplaner
Zitat:
Damit verzögert sich der Boot-Vorgang des Betriebssystems. Um es noch einmal ganz deutlich zu sagen: Es ist SCHWACHSINNIG, das eigene Programm beim Boot-Vorgang zu laden und zu erwarten, dass alle Funktionen von WINDOWS gleich zur Verfügung stehen! Lade es verzögert mit einem Timer. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:00 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz