Verschiedene Inhalte aus einer DB in eine MEMO zusammenfügen

[ZeroQool007]

Hmm...ich Depp....

Delphi-Quellcode:

  if ADODataSet_Suchen.FindField(cvCh20_Anrede).AsString = 'Frau' then
  begin
    Memo1.Lines.Add('Sehr geehrte Frau ' + ADODataSet_Suchen.FindField(cvCh100_NameFirma).AsString);
  end else
  begin
    Memo1.Lines.Add('Sehr geehrter Herr '+ ADODataSet_Suchen.FindField(cvCh100_NameFirma).AsString);
  end;