ich wollte gerne mit einem button eine test.sqlite erstellen wo dann gleich auch eine tabelle mit rein geschrieben wird... stelle aber fest das es vermutlich gar nicht so leicht ist...
hier mal mein anfang...
Code: Alles auswählen
if MessageDlg('Möchten Sie eine neue Datenbank für das med. Pers. erstellen?', mtConfirmation, [mbOK], 0) then
begin
if InputQuery('Name wählen', 'Wie soll die Datei heißen?', name) then
begin
AssignFile(f, ExtractFilePath(ParamStr(0)) + name + '.sqlite');
ReWrite(f);
Close(f);
medpers.Text:=ExtractFilePath(ParamStr(0)) + name + '.sqlite');
{hier wird dann die sql datei eingebunden}
end;
end;