Hi zusammen
Ich habe - zumindest ansatzweise - eine Lösung gefunden:
Delphi-Quellcode:
procedure TDMLSQLite.DoPathListEvent(Sender: TObject;
const Ordner: String; const Pathlist: TStringList);
var i : integer;
begin
// Self.Pathlist.Assign(Pathlist);//<<=== Das hat nie, in welcher Form auch immer, funktioniert
for i := 0 to Pathlist.Count -1 do
begin
SQLiteTestMain.LBxPathlist.Items.Add(Pathlist[i]) //<<== Das steht so nur mal als Test da, funktioniert aber
end;
end;
Wie ich im Verlauf der Beiträge erwähnt habe, war der Sinn der 2. Liste im Datenmodul ja eben der, das ich da durch diese Liste Iterieren und die Bilder auf der Festplatte so in die
DB schreiben kann.
Auf die Idee aber, dass ich an dieser Stelle durch die Liste des Pathframes iterieren könnte, bin ich nur sehr spät gekommen.
So, wie die Schleife dasteht, demonstriert sie nur die Funktion. Im Endeffekt sollen die hier gefundenen Bilder in die Datenbank geschrieben werden.
Vielen Dank für eure Bemühungen!
Gruss
Delbor