String/Memo zeigt unterschiedlich an Android/Windows

[zeras]

Damit hole ich die Daten aus der DB:

Delphi-Quellcode:

Function Tfmain.GetAlarmFromDB(iAlarm: integer; var Alarm: tAlarm): Boolean;
begin
  Result := False;

  try

    SQLQuery.SQL.Text := Format('SELECT * FROM %s Where %s = %d', [MainTable, feldAlarmNummer, iAlarm]);
    SQLQuery.Open();

    if SQLQuery.RowsAffected = 0 then  begin
      Exit;  //Alarmnummer ist nicht vorhanden, dann Möglichkeit zum Neuanlegen geben
    end;

    Alarm.iAlarmNo := SQLQuery.FieldByName(feldAlarmNummer).AsInteger;
    Alarm.sAlarmUeberschrift := SQLQuery.FieldByName(feldAlarmUeberschrift).AsString;
    Alarm.sAlarmBeschreibung := SQLQuery.FieldByName(feldAlarmBeschreibung).AsString;
    Alarm.sAlarmHinweis := SQLQuery.FieldByName(feldAlarmHinweis).AsString;
    Alarm.sAlarmAktion := SQLQuery.FieldByName(feldAlarmAktion).AsString;
    Alarm.sEigeneHinweise := SQLQuery.FieldByName(feldAlarmEigeneHinweise).AsString;
    Alarm.iID := SQLQuery.FieldByName(feldID).AsInteger;
    Result := True;

  finally

  end;
end;

und damit schreibe ich diese dann in die Memos:

Delphi-Quellcode:

//Daten aus dem Alarm record in das Formular schreiben
Procedure Tfmain.Record2Form(Alarm: tAlarm);
begin
  LabAlarmNummer.Text := Format('A %.5d', [Alarm.iAlarmNo]);
  meUeberschrift.Text := Alarm.sAlarmUeberschrift;
  meBeschreibung.Text := Alarm.sAlarmBeschreibung;
  meHinweis.Lines.Text := Alarm.sAlarmHinweis;
  meAktion.Lines.Text := Alarm.sAlarmAktion;
  meEigeneHinweise.Text := Alarm.sEigeneHinweise;
  LabIDPlatzhalter.Text := Alarm.iID.ToString;
end;