Code: Alles auswählen
embedded_gui_common.pas(39,42) Warning: Implicit string type conversion from "AnsiString" to "UnicodeString"
Code: Alles auswählen
procedure TForm1.Button1Click(Sender: TObject);
var
Cfg: TXMLConfig;
begin
Cfg := TXMLConfig.Create(nil);
Cfg.Filename := 'config.xml';
Cfg.SetDeleteValue(Name + '/Left/value', IntToStr(Left), '90'); // Hier kommt die Warnung.
Cfg.Free;
end;
Lass ich "Name" weg.
Und wen ich IntTostr(...) durch eine String Konstante ersetzt, ist die Warnung weg.