It seams that a lot of tests fail compiling, but they compile fine
with Lazarus. I haven't yet found where the code to compile them is.
About the crash, the code to save the XML is trivial:
procedure TGUITestRunner.SaveAsToolButtonClick(Sender: TObject);
begin
if SaveDialog.Execute then
XMLSynEdit.Lines.SaveToFile(UTF8ToSys(SaveDialog.FileName));
end;
...
Procedure TStrings.SaveToStream(Stream: TStream);
Var
S : String;
begin
S:=Text;
Stream.WriteBuffer(Pointer(S)^,Length(S));
end;
No idea what is wrong, as this is extensively used, it should work fine...
--
Felipe Monteiro de Carvalho
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
