Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2009-09

Patch for FPSpreadSheet

6 messages · 4 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Torsten Bonde Christiansen

Hi.

I have created a patch for th FPSpreadSheet component. However, I don't know where I should send it (this Lazarus mailing list doesn't seem the right place), besides I have some comments on it I would like to be more publicly available than this mailing list.
So i hope someone can guide me on where and how to do so.

Kind regards,
- Torsten Bonde Christiansen.

Reply by email

Felipe Monteiro de Carvalho
to Torsten Bonde Christiansen
Torsten Bonde Christiansen wrote
I have created a patch for th FPSpreadSheet component. However, I don't know where I should send it (this Lazarus mailing list doesn't seem the right

Please create a bug report and attach the patch to it.

place), besides I have some comments on it I would like to be more publicly available than this mailing list.

More publicly available then the mailing list? Maybe you ment less? I don't think it can get more public then the mailling list.

Felipe Monteiro de Carvalho

Reply by email

Torsten Bonde Christiansen
to Felipe Monteiro de Carvalho
Felipe Monteiro de Carvalho wrote 8 lines
On Wed, Sep 2, 2009 at 4:56 AM, Torsten Bonde Christiansen wrote: > I have created a patch for th FPSpreadSheet component. However, I don't know > where I should send it (this Lazarus mailing list doesn't seem the right > Please create a bug report and attach the patch to it.

Done and patch attached to it.

Show quoted text 9 lines
> place), besides I have some comments on it I would like to be more publicly > available than this mailing list. > More publicly available then the mailing list? Maybe you ment less? I don't think it can get more public then the mailling list.

Perhaps my formulation was not as intended, i just meant to include a note when submitting the patch. Anyways it is also done.

Kind regards,
- Torsten.
-Torste
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20090902/ebc03dce/attachment.html>

Reply by email

claude
to Felipe Monteiro de Carvalho: Please create a bug report and attach the patch to it. More publicly available then the…

Hello

i'm trying to port a small delphi componant that i use in one app ported to Lazarus.
The componentnt build without problem with *{$MODE DELPHI}* but when i'm in Lazarus ide, if i close a form containing this component, i give a violation access error in my component This error does not occur runnig the application stand alone.

I have try to build the component in FPC mode but the compilation fail with error:

Error: Illegal type conversion: "Int64" to "TFont"

in line

Result := TFont(GetOrdProp(Component, ptrPropInfo)));

of the function

function GetCompFont(Component : TComponent) : TFont;
var ptrPropInfo : PPropInfo;
begin
  ptrPropInfo := GetPropInfo(Component.ClassInfo, 'Font');
  if ptrPropInfo = nil then
     Result := nil
  else
      Result := TFont(GetOrdProp(Component, ptrPropInfo)));
end;

maybe in delphi mode the type casting is wrong getPropInfo return an Int64

can anyone help me

thank
claude
(sorry for my bad english)

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20090905/a1a96da2/attachment.html>

Reply by email

Mattias Gärtner
to claude

Zitat von claude :

Show quoted text 29 lines
Hello i'm trying to port a small delphi componant that i use in one app ported to Lazarus. The componentnt build without problem with *{$MODE DELPHI}* but when i'm in Lazarus ide, if i close a form containing this component, i give a violation access error in my component This error does not occur runnig the application stand alone. I have try to build the component in FPC mode but the compilation fail with error: Error: Illegal type conversion: "Int64" to "TFont" in line Result := TFont(GetOrdProp(Component, ptrPropInfo))); of the function function GetCompFont(Component : TComponent) : TFont; var ptrPropInfo : PPropInfo; begin ptrPropInfo := GetPropInfo(Component.ClassInfo, 'Font'); if ptrPropInfo = nil then Result := nil else Result := TFont(GetOrdProp(Component, ptrPropInfo)));
Maybe:
TFont(GetObjectProp(Component,PropInfo,TFont));
end; maybe in delphi mode the type casting is wrong getPropInfo return an Int64

Mattias

Reply by email

claude
to Mattias Gärtner

Mattias G?rtner a ?crit :

Maybe: TFont(GetObjectProp(Component,PropInfo,TFont));

Thanks mattias compile now in fpc mode
I have always the error message :

"An exeption occured during deletion of Formresizer1.TFormresizer: Acess vilation"

but i dont know where it come.
I serch ...... :)

regards
Claude

Reply by email