Verwende mal lieber die AsString-Methoden.
Also
ADOT_TempFehler.FieldByName('Stationsname').AsString := station_array[SQL_Station_Typ];
Bei deiner Version wird über (
Ole)Variants gegangen und ich habe hier im Hinterkopft das das nicht immer 100% OK läuft ...