Marc Weustink schreef:
> Koenraad Lelong wrote:
>> Marc Weustink schreef:
>>> Sam Liddicott wrote:
>
...
> at leas this is no: "Gtk-WARNING **: cannot open display:"
> so you now have your display and ran into a complete different problem.
>
> Exception=Invalid Filer Signature:
> maybe some endian issue or a corrupt file or a bad compiled string
> constant (the form layout is stored internally in a string)
>
> Maybe, as a test, you can write the contents of the result of
> LazarusResources.Find('TForm'):TLResource directly after the line {$I
> unit1.lrs} in the initialization section of your form.
>
> (and compare this to the contents of unit1.lrs)
>
> Marc
I tried this (renamed my form to TestForm1) :
initialization
{$I unit1.lrs}
writeln('test');
TestRes:=TLresource.Create;
TestRes:=LazarusResources.Find('TTestForm1');
writeln('Name:');
writeln(TestRes.Name);
writeln('Valuetype:');
writeln(TestRes.ValueType);
writeln('Classname:');
writeln(TestRes.ClassName);
end.
The result was :
test
Name:
TTestForm1
Valuetype:
FORMDATA
Classname:
TLResource
[FORMS.PP] ExceptionOccurred
....
unit1.lrs contains :
LazarusResources.Add('TTestForm1','FORMDATA',[
'TPF0'#10'TTestForm1'#9'TestForm1'#4'Left'#3#17#1#6'Height'#2'y'#3'Top'#3#28#1
....
Any conclusions ?
Regards,
Koenraad Lelong.
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
