Fehler bei String und Boolean

[cell]

hi habe eine frage bezüglich String und Boolean
ich vertehe nciht warum er mir hier folgende Fehlermeldung ausspuckt!!
Inkomatible Typen String und Boolean
folgendermaßen schaut der Quelltext aus

Delphi-Quellcode:

begin
with DataModule1 do
  begin
       //Query.close;
       Query.SQL.Clear;
       Query.SQL.Text:= selectsql('Anfangsgewicht_Belag_vorne_oben, Anfangsgewicht_Belag_vorne_unten, Anfangsgewicht_Belag_hinten_oben, Anfangsgewicht_Belag_hinten_unten, Endgewicht_Belag_vorne_oben, Endgewicht_Belag_vorne_unten, Endgewicht_Belag_hinten_oben, Endgewicht_Belag_hinten_unten','Friktionstest','Testnummer='+frmtestauswahl.cbotestnummer.Text,'','');
       //ShowMessage(inttostr(length(Query.SQL.Text)));
       Query.Open;
       Query.First;
       while not Query.Eof do
       begin
            if (Query.Fields[0].AsString='') or Query.Fields[1].AsString='') then
               ShowMessage('grr')
               //frmgewichtaendern.txtbelagvo.Text:=0.00
            else
            frmgewichtaendern.txtbelagvo.Text:=(Query.Fields[0].AsString);
            frmgewichtaendern.txtbelagvu.Text:=(Query.Fields[1].AsString);
            Query.Next;
       end;

plz help
thx

[barf00s]

"ich vertehe nciht warum er mir hier folgende Fehlermeldung ausspuckt!!"

wo = hier?

[cell]

hab die antwort schon thx hab vergessen das ich die klammer aufmachen muss :oops:
thx

[freak4fun]

Zitat:

Zitat von cell

Delphi-Quellcode:

begin
with DataModule1 do
  begin
       //Query.close;
       Query.SQL.Clear;
       Query.SQL.Text:= selectsql('Anfangsgewicht_Belag_vorne_oben, Anfangsgewicht_Belag_vorne_unten, Anfangsgewicht_Belag_hinten_oben, Anfangsgewicht_Belag_hinten_unten, Endgewicht_Belag_vorne_oben, Endgewicht_Belag_vorne_unten, Endgewicht_Belag_hinten_oben, Endgewicht_Belag_hinten_unten','Friktionstest','Testnummer='+frmtestauswahl.cbotestnummer.Text,'','');
       //ShowMessage(inttostr(length(Query.SQL.Text)));
       Query.Open;
       Query.First;
       while not Query.Eof do
       begin
            if (Query.Fields[0].AsString='') or --> ( <--  Query.Fields[1].AsString='') then
               ShowMessage('grr')
               //frmgewichtaendern.txtbelagvo.Text:=0.00
            else
            frmgewichtaendern.txtbelagvo.Text:=(Query.Fields[0].AsString);
            frmgewichtaendern.txtbelagvu.Text:=(Query.Fields[1].AsString);
            Query.Next;
       end;

[barf00s]

beim nächsten mal würdes auch reichen nur die TATSÄCHLICHE zeile zu pasten wo der fehler auftaucht - wenn man sich jedesma erst dummsuchen muss - is doof .....

[cell]

aber ich bin gerade draufgekommen das das nicht so geht wie ich mir das vorstelle!!
ich habe eine Form wo über eine Datenbank die daten in Labels eingelesen werden!! Wenn jedoch kein Eintrag in der Datenbank ist, kommt eine Fehlermeldung:
''kein gültiger Float Wert
was auch klar ist
mein Problem ist ich kann zwar abfragen ob das leer ist, aber von wo weiß ich dann was leer ist ??
kann mir da jemand einen tipp geben ???

thx

[Hansa]

Die letzte Frage verstehe ich jetzt nicht. Aber ich will Dir auch nur folgenden Tip geben : Verwende nicht so lange SQL-Zeilen ! Wozu gibt es denn Add oder SelectSQL [1] usw. Der Fehler mit der Klammer wäre sofort aufgefallen und zwar wahrscheinlich dir selber !

Ansonsten könnte es passieren, daß dir irgendwann das Blech wegfliegt ! :lol:

[cell]

Zitat:

Zitat von cell

hab die antwort schon thx hab vergessen das ich die klammer aufmachen muss :oops:
thx

ist mir eh selber aufgefallen
ähmm ich kenn nur diese schreibeweise von SQL
sry