Label, Editfeld und DBlookupListbox

[harrybo]

Hi Hansa,
Du hast recht, es geht professioneller und auch schneller in der Ausführung wenn Du mit Parametern arbeitest. Vorteil: der SQL Text muss nicht geändert werden. Einen Parameter kannst Du im Design Modus über den Objekt Inspector anlegen (Params, hast Du wahrscheinlich schon) oder per Code für Deinen Fall mit
WGDS.Params.CreateParam(ftInteger, 'ID'); Deinen SQL Text kannst Du nun stehen lassen als
WGDS.SelectSQL.Text := 'SELECT * FROM WG8 WHERE ID = :ID'; Jetzt aktualisierst Du mit

Delphi-Quellcode:

with WGDS do try
  DisableControls;
  if Active then Close;
  ParamByName('ID').Value := ArtDS.FieldByName ('ID_WG').AsInteger;
  // Alternativ, wenn die Abfrage genau einen Parameter hat:
  // Params[0].Value := ArtDS.FieldByName ('ID_WG').AsInteger;
  Open;
finally
  EnableControls;
end;

Bingo! Umformen per IntToStr ist auch nicht nötig, da es sich ja um einen echten Integer Parameter handelt.
gruß, harrybo