Here is two types of samples to do it (in linux/unix):
For some strange reason, I need to hide and display the window again :(
I do not know if that's a bug, or a design issue ...
When you display again, you should place the window in the last
position it was, or it will display in the default location that it
was created in the first place.

const xpm ='/home/ik/gtodo.xpm';

procedure TForm1.Button1Click ( Sender: TObject ) ;
begin
hide;
 Icon.LoadFromFile(xpm);
show;

end;

procedure TForm1.Button2Click ( Sender: TObject ) ;
var
 ico : TIcon;
begin
 hide;
 ico := TIcon.Create;
 ico.LoadFromFile(xpm);
 icon.Assign(ico);
 ico.free;
 show;

end;

Ido

On 10/19/06, Chad Crabtree <[EMAIL PROTECTED]> wrote:
Ok I believe I understand.

More specifically could you give me a code example of instantaiting an TIcon
instance?  That is what I was having trouble with.  I don't really
understand how to assign an image to the TIcon.

Thank ou


On 10/19/06, ik <[EMAIL PROTECTED]> wrote:
> self.form1.icon := TIcon
>
> afaik
>
> It will change the icon on run time ...
>



--
http://ik.homelinux.org/

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to