[lazarus] Patch: progressbar smooth and vertical (win32)

[Micha Nelissen]

Michael Van Canneyt wrote:
> On Thu, 26 Jun 2003, Micha Nelissen wrote:
>
>> As you can see, I have commented the BarShowText functionality,
>> because I can't get it to work. I think there is no functionality in
>> win32 natively to draw text on a progressbar. How is it supposed to
>> look?
>
> A question. I have been testing this, and I always get an 'Invalid
> Class typecast' when I try the quit menu. Do you have this too ?

I've found it. It happens right after the line I patched earlier;
win32object.inc:542. Sender.Owner = nil there. Is there a difference for a
TMenuItem between a parent and an owner? Shouldn't those both be simply
Sender.Parent? (Or Sender.Owner)?

Regards,

Micha.