Umstellung Paradox ->Firebird die 2.

[BrunoT]

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.