Couldn't convert varient of type (NULL) into type (String)

[Svenkan]

Delphi-Quellcode:

  for count := 1 to Pred(Query2.RecordCount) do begin
  hcode:='<tr>'+sLineBreak+'<td width=9% bgcolor=#666666><font color=#FFFFFF size=2 face=Arial> '+Query2.FieldValues['KLASSEN']+'</font></td>'+sLineBreak+'<td width=9% bgcolor=#666666><font color=#FFFFFF size=2 face=Arial> '+Query2.FieldValues['S']+'</font></td>'+sLineBreak+'<td width=9% bgcolor=#666666><font color=#FFFFFF size=2 face=Arial> '+Query2.FieldValues['FUER']+'</font></td>'+sLineBreak+'<td width=9% bgcolor=#666666><font color=#FFFFFF size=2 face=Arial> '+Query2.FieldValues['WER']+'</font></td>'+sLineBreak+'<td width=9% bgcolor=#666666><font color=#FFFFFF size=2 face=Arial> '+Query2.FieldValues['FACH']+'</font></td>'+sLineBreak+'<td width=9% bgcolor=#666666><font color=#FFFFFF size=2 face=Arial> '+Query2.FieldValues['RAUM']+'</font></td>'+sLineBreak+'<td width=37% bgcolor=#666666><font color=#FFFFFF size=2 face=Arial> '+Query2.FieldValues['BEMER_SCH']+'</font></td>'+sLineBreak+'</tr>'+sLineBreak;
   WriteLn(Datei, hcode);
  end;

Bei diesem Aufruf bekomme ich die im Topic genannte Fehlermeldung.
Zudem wird immer für alle Zeile nur der Inhalt der ersten Zeile ausgegeben.
Hat da jemand eine Idee?

[mkinzler]

Ein tabellenfeld hat den Wert NULL was in Delphi in etwa mit Nil vergleichbar ist, also keinen Wert.

[Svenkan]

Kann Delphi dann nicht einfach akzeptieren, dass es nichts auszugeben gibt?
Wie kann ich das Problem beheben?

[mkinzler]

Vor der Ausgabe auf die Null-Werte reagieren (.isNull)

[Christian Seehase]

Moin Svenkan,

Du könntest Dir auch einfach eine Funktion bauen, der Du die Feldwerte übergibst, und die dann, je nach Inhalt einen für Dich verarbeitbaren Wert zurückgibt.

[jbg]

Zitat von Christian Seehase:

Du könntest Dir auch einfach eine Funktion bauen

Du meinst so eine Funktion wie VarToStr aus der Variants Unit?

[mkinzler]

Ja so ähnlich, dort könntest du auf Null abfragen und ggf 0 oder '' zurückgeben. Bei anderen DBMS kann man das auch direkt in der Abfrage erledigen.

[Svenkan]

Zitat von mkinzler:

Vor der Ausgabe auf die Null-Werte reagieren (.isNull)

Dadurch bekomm ich leider nur die Fehlermeldung 'Invalid varient operation'.

[mkinzler]

Zeig mal deinen geänderten Code

[Svenkan]

Delphi-Quellcode:

for count := 1 to Pred(Query2.RecordCount) do begin
  Query2.FieldValues['WER'].isNull;
  Query2.FieldValues['FUER'].isNull;
  Query2.FieldValues['RAUM'].isNull;
  Query2.FieldValues['BEMER_SCH'].isNull;