Abfrage aus 2 Tabellen in Access funktioniert nicht

[StoRmtec]

ja aber mit drucker habe ich ja nichts oder ???

habe es jetzt so gemacht

Delphi-Quellcode:

procedure TForm2.Button17Click(Sender: TObject);
var gesamt1, kostenverbrauch, kostenwartung : extended;
begin
  wartungq.Close;
  wartungq.SQL.text := 'select sum(kosten) as Gesamtkosten from wartung where druckernameid=('''+dbedit1.text+''')';
  wartungq.open;
  if wartungq.RecordCount > 0 then
  begin
    geswartung.text := wartungq.FieldByName('Gesamtkosten').asString;
    kostenwartung :=  wartungq.FieldByName('Gesamtkosten').asFloat;
  end
  else
  begin
    geswartung.text := '0';
    kostenwartung := 0;
  end;
  verbrauchq.Close;
  verbrauchq.SQL.text := 'select sum(tonerkostengesamt) as Gesamtsumme from verbrauch where druckernameid=('''+dbedit1.text+''')';
  verbrauchq.open;
  if verbrauchq.RecordCount > 0 then
  begin
     gesverbrauch.Text := verbrauchq.FieldByName('Gesamtsumme').asString;
     kostenverbrauch :=  verbrauchq.FieldByName('Gesamtsumme').asFloat;
  end
  else
  begin
    gesverbrauch.Text := '0';
    kostenverbrauch := 0;
  end;
gesamt1 := kostenwartung + kostenverbrauch;
gesamt.Text := floattostr(gesamt1) +' €';
end;

jetzt holt er mir den preis wenn bei der wartung was drinnen ist und beim verbrauch nicht
umgekehrt geht es nicht. wenn die wartung leer ist und der verbrauch was drinnen ist.