Hab jetzt endlich meinen Fehler in folgenden Zeilen ausgebessert - mir ist aber nicht ganz klar wieso der ERSTE Versuch NICHT funktioniert:
FAIL if (UniMainModule.d6.FieldByName('archiv').asstring <> '') OR
UniMainModule.d6.FieldByName('archiv').IsNull = false) then begin
Feld_leer:=false;
FUNZT if (UniMainModule.d6.FieldByName('archiv').asstring = '') OR
(UniMainModule.d6.FieldByName('archiv').IsNull) then begin
Feld_leer:=true;
PS.. das
mySQL Feld ist ein varchar(40) utf8mb4_general_ci "NULL"
.. hat mir viel Zeit gekostet
Danke für Hinweise und liebe Grüße
Erich
Erich Wanker - for life:=1971 to lebensende do begin ..
O
/H\
/ \