Hi Marabu,
ich bin hier um zu lernen. Die
DP hat mir schon viel geholfen.
zu den "langsamen
SQL-Datenbanken": als EDV-Dienstleister bin ich oft über solche schlecht gemachten Client-Server-Applicationen gestolpert.
Natürlich werde ich ein bestehendes Programm nicht zu
SQL portieren(never touch a runnig system). Das ist ein neues Projekt, wo ich Teile aus alten Projekten recycle. Als Anfang mit Firebird habe ich mir natürlich eine vorhandene Programmlogik genommen, um mich nicht darum kümmern zu müssen.
Zu den getrennt abgelegten Daten: Ich werde warscheinlich zwei Datenbankdateien auf dem Server ablegen, eine mit den veränderlichen Daten, die andere mit den statischen. Das erleichtert die Datensicherung und ist vieleicht auch für die Performance besser.
Ach so: warum geht in einer
Query der Filter nicht?(keine Datensätze) wozu benutzt man den überhaupt, wenn man alles mit
SQL-Abfragen erschlagen kann?
Delphi-Quellcode:
procedure TFinanzaemter.TabChange(Sender: TObject);
var
F: string;
begin
begin
if tab.tabindex = 26 then
begin
// ZQFinanzamt.Filtered := false
ZQFinanzamt.Active := False;
ZQFinanzamt.SQL.clear;
ZQFinanzamt.SQL.Add('Select * from Finanzamt ORDER BY name');
ZQFinanzamt.Active := True;
end
else
begin
{ F := format('Name = ''%s*''', [chr(Tab.TabIndex + 65)]);
ZQFinanzamt.Filtered := false;
ZQFinanzamt.Filter := F;
ZQFinanzamt.Filtered := True; }
ZQFinanzamt.Active := False;
ZQFinanzamt.SQL.clear;
ZQFinanzamt.SQL.Add('Select * from Finanzamt Where Name LIKE ''' + chr(Tab.TabIndex + 65) + '%'' ORDER BY name');
ZQFinanzamt.Active := True;
end;
end;
end;
oder hätte ich dort auch % nehmen sollen?
mfg
BrunoT
P.S. @MagicAndre1981 Abfragen wie sonst? hat sich erledigt s.o.