[lazarus] local help files
Is there some place I can download the html help to my local pc and setup Lazarus to rather use that instead of always going onto the net to view the help? Regards, - Graeme - _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Dialogs to be converted to LFM
Hi, I have seen on the Lazarus wiki site that a lot of dialogs still need to be converted. A lot of the dialogs also have resizing issues (you can resize them to hide everything but the title bar - which makes no sence). Can I start converting some, and post the patches to the mailing list? Regards, - Graeme - _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] lfm bug
try this: create new project with one form, put on form the tdbf component, from object inspector define FieldDefs items (one or two), save the project, then reopen saved project and there is not fielddefs anymore...is this known bug? latest lazarus from cvs and fpc from 0.9.10 packages...on linux -- bye, ...s]-[it happens... _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Send commands to shell
barko wrote: I use this on linux and windows: function Run(fexec,args:string; wait:boolean):boolean; var ffexec:string; begin result:=true; try if fileexists(fexec) then ffexec:=fexec else Dne sreda 16. novembra 2005 15:37 je Kleiton Luiz napisal(a): Hi, i'm try to send a commad to shell... example: i need send to shell a command "ls" and save results in a file "lists.txt" in a shel this command make this job: $ ls > lists.txt i need in Lazarus execute this command. anypeople can help me ? Thanks ! Or you can use the lazy man's method. Include "unix" in the uses clause, then do: shell('ls "/my directory/" > "/destination/lists.txt"'); It won't work in Windows though, and isn't as safe as using a TProcess. If the shell command doesn't immediately return from executing, it will appear to lock up your application. Also, note the single quotes around the total command line, and the double-quotes within the command line to handle spaces within the paths. For Windows, the shortcut is: include "windows" in the uses clause then do: shellexecute(0, 'open', pchar('dir "c:\my directory" > "c:\destination\lists.txt"'), nil, nil, SW_SHOWNORMAL); I just give these as examples. I recommend the TProcess method, because it's cross-platform and has more checks and balances built in. But, I admit that when I'm spitting out a quick program just for myself, I'm more likely to use "shell()" -Tony _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] MAC address
Very helpful. Thank you. a. _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Proposition of patch for bugreport 1445 and 1443
Hello, Proposition attached. Mainly it uses PD_RETURNDC option for printers dialogs and strong returned DC into fDC. This returned DC has all options selected by user applied :-) As for 1143 I suppose it is buggy driver , workaround was to replace PDev.Device with pDev.Driver field for CreateDC which field has correct information (by accident?) (I cannot test it with physically attached printer Lexmark 1020) I haven't found other such printer driver (of course I cannot test it all) Best regards Boguslaw Brandys Index: win32/winprinters.inc === --- win32/winprinters.inc (revision 8162) +++ win32/winprinters.inc (working copy) @@ -64,7 +64,7 @@ begin lStructSize:=SizeOf(lpp); hInstance:=LCLType.HInstance; - Flags:=aFlag; + Flags:=aFlag or PD_RETURNDC; hWndOwner:=TWin32WidgetSet(WidgetSet).AppHandle; PDev:=TPrinterDevice(Printers.Objects[PrinterIndex]); @@ -105,6 +105,10 @@ //Set the properties for the selected printer PDev:=TPrinterDevice(Printers.Objects[PrinterIndex]); PDev.DevMode:=DevMode^; + ClearDC; + fDC := lpp.hDC; + if Assigned(Canvas) then Canvas.Handle:=fDC; + fLastHandleType:=2; finally GlobalUnlock(lpp.hDevMode); GlobalFree(lpp.hDevMode); @@ -162,7 +166,7 @@ PChar(PDev.Port),@PDev.DevMode); if fDC=0 then - fDC:=CreateIC(PChar('winspool'),PChar(PDev.Device), + fDC:=CreateIC(PChar('WINSPOOL'),PChar(PDev.Device), PChar(PDev.Port),@PDev.DevMode); if fDC=0 then @@ -174,22 +178,35 @@ end; procedure TWinPrinter.SetDC; -var PDev : TPrinterDevice; +var +PDev : TPrinterDevice; +Driver : PChar; + + + +function IsNT : Boolean; +var + OVI: TOsVersionInfo; begin + OVI.dwOSVersionInfoSize := Sizeof( OVI ); + GetVersionEx( OVI ); + Result := (OVI.dwPlatformId = VER_PLATFORM_WIN32_NT); +end; + + + +begin if (fLastHandleType<>2) and (Printers.Count>0) then begin ClearDC; - +if IsNt then Driver := pChar('WINSPOOL') +else +Driver := nil; PDev:=TPrinterDevice(Printers.Objects[PrinterIndex]); -fDC:=CreateDC(PChar(PDev.Driver),PChar(PDev.Device), -PChar(PDev.Port),@PDev.DevMode); - +fDC:=CreateDC(Driver,PChar(PDev.Device),nil,@PDev.DevMode); +if fDC=0 then fDC:=CreateDC(Driver,PChar(PDev.Driver),nil,@PDev.DevMode); if fDC=0 then - fDC:=CreateDC(PChar('winspool'),PChar(PDev.Device), - PChar(PDev.Port),@PDev.DevMode); - -if fDC=0 then - raise EPrinter.Create(Format('Invalide printer (DC=%d Driver=%s Device=%s Port=%s)',[fDC,Pdev.Driver,PDev.Device,PDev.Port])); + raise EPrinter.Create(Format('Invalid printer (Error: %s DC=%d Driver=%s Device=%s Port=%s)',[SysErrorMessage(GetLastError),fDC,Pdev.Driver,PDev.Device,PDev.Port])); if Assigned(Canvas) then Canvas.Handle:=fDC; fLastHandleType:=2;
Re: [lazarus] Send commands to shell
I use this on linux and windows: function Run(fexec,args:string; wait:boolean):boolean; var ffexec:string; begin result:=true; try if fileexists(fexec) then ffexec:=fexec else ffexec:=FileSearch(fexec,GetEnv('PATH')); if length(ffexec)<>0 then begin if not wait then begin with TProcess.Create(application) do begin CommandLine:=trim(ffexec+' '+args); Execute; end; end else begin ExecuteProcess(ffexec,args); end; end else result:=false; except result:=false; end; end; Dne sreda 16. novembra 2005 15:37 je Kleiton Luiz napisal(a): > Hi, i'm try to send a commad to shell... > > example: i need send to shell a command "ls" and save results in a file > "lists.txt" > > in a shel this command make this job: > > $ ls > lists.txt > > i need in Lazarus execute this command. > > anypeople can help me ? Thanks ! > > > > > > > --- > --+ > Kleiton L R Soares (cel. 9639-5829) > Analista de Sistemas - ADM. Redes > ICQ.: 132279038 MSN.: [EMAIL PROTECTED] > > "Quem conhece a sua ignorância revela a mais profunda sapiência. > Quem ignora a sua ignorância vive na mais profunda ilusão". > (Lao-Tsé). > > > > > > - > Yahoo! FareChase - Search multiple travel sites in one click. -- bye, ...s]-[it happens... _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Send commands to shell
Hi, i'm try to send a commad to shell... example: i need send to shell a command "ls" and save results in a file "lists.txt" in a shel this command make this job: $ ls > lists.txt i need in Lazarus execute this command. anypeople can help me ? Thanks ! --- --+Kleiton L R Soares (cel. 9639-5829)Analista de Sistemas - ADM. RedesICQ.: 132279038 MSN.: [EMAIL PROTECTED] "Quem conhece a sua ignorância revela a mais profunda sapiência. Quem ignora a sua ignorância vive na mais profunda ilusão". (Lao-Tsé). Yahoo! FareChase - Search multiple travel sites in one click.
Re: [lazarus] Why are the generated binaries so big?
On 11/16/05, Bogusław Brandys <[EMAIL PROTECTED]> wrote: > Graeme Geldenhuys wrote: > > Hi Darek, > > > > [ Strange name, where is it from? ] > > > > Thanks for the tip. I thought it might be debugging info making it > > bloated. My Lazarus .exe went back down to 7Mb! :) > > > > Regards, > > - Graeme - > > Additional related feature request would be to not recompile each time I > try to debug (link is very slow on Windows) > Delphi for example detect that there is no need to recompile nothing and > simply run and debug program. There is a bug entry for this: http://www.lazarus.freepascal.org/mantis/view.php?id=894 -- Alexandre Leclerc _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Component adds no new tab on lazarus - strange problem
/home/yourname/.lazarus/bin look in this directory... copy startlazarus into this directory and run from it.. it works everytime when you install new components... Dne sreda 16. novembra 2005 13:56 je Armando Jorge Sousa napisal(a): > Hello. > > I am new to this mailing list. > > I have successfully installed lazarus on my laptop running Mandriva Linux. > After that, I have successfully installed "ZeosLib" components. > After that, I successfully installed another component I am working on. > > After that, I installed lazarus successfully on a Desktop PC. > Only that on the desktop I was unable to install any component: > I could never see an additional "tab" in the lazarus tools. > The 2 components I tried compile and lazarus rebuilds normally but > after normal restart there is no additional tab. > Although I tried other version stuff, this happened in the > same versions I used on the laptop: fpc2.0.0 and lazarus 0.9.10. > > The desktop runs Debian "Sarge" with a kernel 2.4.27 > (not my choice...). > > Installation in the desktop was made with RPMs converted into .DEBs, > as explained in the wiki. > I already 777 all permissions in the /etc/fpc.cfg, .lazarus directory, > lazarus and fpc directories, removed and re-installed and still no change. > > I find this to be a lazarus problem because neither the Zeos nor > my own package adds the registered tab... > > My guess is that this is a permissions problem (?). Maybe lazarus tries > to write > something somewhere fails and returns no error message, not even in the > console. > > Any hints ? Any hint on how to debug such a problem ? > > Thanks for all the help > > Armando Jorge Sousa -- bye, ...s]-[it happens... _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] MAC address
Andrea Mauri wrote: I would like to convert a delphi/kylix project in lazarus project. In the kylix project there is also a function that checks the MAC address: ethernet:= 'eth0'; i:= socket(AF_INET, 2, 0) ; if not i < 0 then begin StrPLCopy(@f.ifrn_name, ethernet, IFNAMSIZ); if not ioctl(i,SIOCGIFHWADDR,@f) < 0 then begin m := @f.ifru_dstaddr.sa_data; // MAC FmtStr(MAC,'%.2x:%.2x:%.2x:%.2x:%.2x:%.2x', [Byte(m[0]), Byte(m[1]), Byte(m[2]), Byte(m[3]), Byte(m[4]), Byte(m[5])]); end; end; There is a way to do it also with lazarus/fpc? I think it can. use unix and/or baseunix and replace socket/ioctl with fpsocket/fpioctl (I didn't check) Marc _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] MAC address
On Wed, 16 Nov 2005, Andrea Mauri wrote: I would like to convert a delphi/kylix project in lazarus project. In the kylix project there is also a function that checks the MAC address: ethernet:= 'eth0'; i:= socket(AF_INET, 2, 0) ; if not i < 0 then begin StrPLCopy(@f.ifrn_name, ethernet, IFNAMSIZ); if not ioctl(i,SIOCGIFHWADDR,@f) < 0 then begin m := @f.ifru_dstaddr.sa_data; // MAC FmtStr(MAC,'%.2x:%.2x:%.2x:%.2x:%.2x:%.2x', [Byte(m[0]), Byte(m[1]), Byte(m[2]), Byte(m[3]), Byte(m[4]), Byte(m[5])]); end; end; There is a way to do it also with lazarus/fpc? Yes. See the guid code in the packages (packages/extra/guid). It gets a GUID bases on the MAC address, and uses the same technique as described above. Michael. _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Re: Download Free Pascal 2.0.1
Here is the download page: http://sourceforge.net/project/showfiles.php?group_id=89339 Find "Lazarus 0.9.10 RPM [Notes] (2005-10-06 11:32)". Click on it. Now download and install: fpc-2.0.1-050923.i386.rpm and fpcsrc-2.0.1-050923.i386.rpm and lazarus-0.9.10-0.i386.rpm .. Felipe _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Download Free Pascal 2.0.1
Hi, i'm try to install Lazarus 0.9.10 but this package need install fpc 2.0.1, i don't can download this version of fpc because on site have only the fpc 2.0.0, anypeope can downloador this is a wrong way Whaiting answers, thanks ! --- --+Kleiton L R Soares (cel. 9639-5829)Analista de Sistemas - ADM. RedesICQ.: 132279038 MSN.: [EMAIL PROTECTED] "Quem conhece a sua ignorância revela a mais profunda sapiência. Quem ignora a sua ignorância vive na mais profunda ilusão". (Lao-Tsé). Yahoo! FareChase - Search multiple travel sites in one click.
Re: [lazarus] Component adds no new tab on lazarus - strange problem
On Wed, 2005-11-16 at 12:56 +, Armando Jorge Sousa wrote: > I find this to be a lazarus problem because neither the Zeos nor > my own package adds the registered tab... How did you start lazarus? With 'lazarus' or with 'startlazarus'. Try to start it with 'startlazarus'. Probably you are running the wrong lazarus-binary. Try if you can find multiple binaries, and try them all. -- Met vriendelijke groeten, Joost van der Sluis CNOC Informatiesystemen en Netwerken http://www.cnoc.nl _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Component adds no new tab on lazarus - strange problem
Hello. I am new to this mailing list. I have successfully installed lazarus on my laptop running Mandriva Linux. After that, I have successfully installed "ZeosLib" components. After that, I successfully installed another component I am working on. After that, I installed lazarus successfully on a Desktop PC. Only that on the desktop I was unable to install any component: I could never see an additional "tab" in the lazarus tools. The 2 components I tried compile and lazarus rebuilds normally but after normal restart there is no additional tab. Although I tried other version stuff, this happened in the same versions I used on the laptop: fpc2.0.0 and lazarus 0.9.10. The desktop runs Debian "Sarge" with a kernel 2.4.27 (not my choice...). Installation in the desktop was made with RPMs converted into .DEBs, as explained in the wiki. I already 777 all permissions in the /etc/fpc.cfg, .lazarus directory, lazarus and fpc directories, removed and re-installed and still no change. I find this to be a lazarus problem because neither the Zeos nor my own package adds the registered tab... My guess is that this is a permissions problem (?). Maybe lazarus tries to write something somewhere fails and returns no error message, not even in the console. Any hints ? Any hint on how to debug such a problem ? Thanks for all the help Armando Jorge Sousa -- Armando J. M. Sousa FEUP - DEEC - ISR R.Dr.Roberto Frias, S/N 4200-465 Porto Tel: +351 225 081 815 Fax: +351 225 081 443 Personal web page: http://www.fe.up.pt/~asousa RoboSoccer web page: http://www.fe.up.pt/~robosoc _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] MAC address
I would like to convert a delphi/kylix project in lazarus project. In the kylix project there is also a function that checks the MAC address: ethernet:= 'eth0'; i:= socket(AF_INET, 2, 0) ; if not i < 0 then begin StrPLCopy(@f.ifrn_name, ethernet, IFNAMSIZ); if not ioctl(i,SIOCGIFHWADDR,@f) < 0 then begin m := @f.ifru_dstaddr.sa_data; // MAC FmtStr(MAC,'%.2x:%.2x:%.2x:%.2x:%.2x:%.2x', [Byte(m[0]), Byte(m[1]), Byte(m[2]), Byte(m[3]), Byte(m[4]), Byte(m[5])]); end; end; There is a way to do it also with lazarus/fpc? Thanks, Andrea _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Patch for unitinfodlg.pp
Small patch to fix resizing issues. Lazarus 0.9.10 PS: Next time I will use 'svn diff'. Regards, - Graeme - *** *** 50,56 outpath: TLabel; uIncludedBy: TLabel; outIncludedBy: TLabel; ! clearIncludedBy: TBitBtn; PathsGroupBox: TGroupBox; UnitPathLabel: TLabel; UnitPathEdit: TEdit; --- 50,56 outpath: TLabel; uIncludedBy: TLabel; outIncludedBy: TLabel; ! clearIncludedBy: TButton; PathsGroupBox: TGroupBox; UnitPathLabel: TLabel; UnitPathEdit: TEdit; *** *** 135,140 --- 135,142 Width:=500; Height:=300; + Constraints.MinWidth := 275; + Constraints.MinHeight := 290; position:=poScreenCenter; OnResize:[EMAIL PROTECTED]; *** *** 267,281 autosize:=true; end; ! clearIncludedBy:=TBitBtn.Create(Self); with clearIncludedBy do begin ! Name:='clearIncludedBy'; ! Parent:=Self; ! Left:=Self.ClientWidth-55; ! Top:=122; ! Width:=50; ! Caption:=lisUIDClear; ! OnClick:[EMAIL PROTECTED]; end; PathsGroupBox:=TGroupBox.Create(Self); --- 269,284 autosize:=true; end; ! clearIncludedBy:=TButton.Create(Self); with clearIncludedBy do begin ! Name := 'clearIncludedBy'; ! Parent := Self; ! Left := Self.ClientWidth-55; ! Top:= 122; ! Width := 50; ! Height := 25; ! Caption:= lisUIDClear; ! OnClick:= @clearIncludedByClick; end; PathsGroupBox:=TGroupBox.Create(Self); *** *** 505,511 with clearIncludedBy do begin Left:=Self.ClientWidth-55; ! top:=124; end; with PathsGroupBox do begin --- 508,514 with clearIncludedBy do begin Left:=Self.ClientWidth-55; ! top:=122; end; with PathsGroupBox do begin
[lazarus] Patch for todolist.pp
Small patch to enable RowSelect in the grid. Lazarus 0.9.10 Regards, - Graeme - *** *** 340,353 lvTodo:=TListView.Create(Self); with lvTodo do begin ! parent:=self; ! Left := 0; ! Top := 22; ! Width := 469; ! Height := 237; ! Align := alClient; ! ViewStyle:=vsReport; ! lvToDo.OnDblClick:[EMAIL PROTECTED]; //priority column C:=Columns.Add; C.Caption := ' !'; --- 340,354 lvTodo:=TListView.Create(Self); with lvTodo do begin ! parent := self; ! Left:= 0; ! Top := 22; ! Width := 469; ! Height := 237; ! Align := alClient; ! RowSelect := True; ! ViewStyle := vsReport; ! lvToDo.OnDblClick := @actEditGoto; //priority column C:=Columns.Add; C.Caption := ' !';
Re: [lazarus] Why are the generated binaries so big?
Graeme Geldenhuys wrote: > Hi Darek, > > [ Strange name, where is it from? ] > > Thanks for the tip. I thought it might be debugging info making it > bloated. My Lazarus .exe went back down to 7Mb! :) > > Regards, > - Graeme - Additional related feature request would be to not recompile each time I try to debug (link is very slow on Windows) Delphi for example detect that there is no need to recompile nothing and simply run and debug program. The best thing also would be to have incremental linker,but it's a issue for future versions while stop recompiling all the time is doable today. Regards Boguslaw Brandys _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Re: TBitBtn and custom glyph
Graeme Geldenhuys wrote: > Thanks for all the replies. For now I would prefer to use the more > stable version of Laz (0.9.10). Can I convert my bmp's to another > format that is currently supported in Laz with transparency? I see xpm's > are also used in Lazarus - do they support transparency?. What tool can > I use if it is possible? > Use xnView small freeware tool. I have used it to convert bitmaps for RemObjects Pascal Script Lazarus package. Cannot edit but conversion is well done. Regards Boguslaw Brandys _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Re: TBitBtn and custom glyph
Felipe Monteiro de Carvalho wrote: You will also notice there are no programs on Windows that can edit .xpm files. I tryed Photoshop, fireworks, corel draw, none support xpm. xpm is the standard format for glyphs on Linux. What about gimp? At least it recognized an xpm and can show a preview. http://www.gimp.org/downloads/ Vincent. _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
Re: [lazarus] Re: TBitBtn and custom glyph
Hi. >You will also notice there are no programs on Windows that can edit .xpm >files. I tryed Photoshop, fireworks, corel draw, none support xpm. >xpm is the standard format for glyphs on Linux. What about Gimp for Win32? /Chrizz Message from Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>@sea.gmane.org received on 2005-11-16 10:20 2005-11-16Felipe Monteiro de Carvalho <[EMAIL PROTECTED]>@sea.gmane.org 10:20 Please respond to lazarus@miraclec.com Sent by news <[EMAIL PROTECTED]> To: lazarus@miraclec.com cc: (bcc: Christer T Johansson/SEROP/ABB) Subject: [lazarus] Re: TBitBtn and custom glyph Graeme Geldenhuys wrote: > Thanks for all the replies. For now I would prefer to use the more > stable version of Laz (0.9.10). Can I convert my bmp's to another > format that is currently supported in Laz with transparency? I see xpm's > are also used in Lazarus - do they support transparency?. What tool can > I use if it is possible? A xpm image will work, but only on Linux. On Windows the result will not be good. I think it will appear black, but I need to retest. You will also notice there are no programs on Windows that can edit .xpm files. I tryed Photoshop, fireworks, corel draw, none support xpm. xpm is the standard format for glyphs on Linux. There are 2 solutions with the 0.9.10 version: * Use the "kind" property of the button and use one of the standard glyphs, there are quite a few. They are transparent due to the unusual way they are stored and loaded. * Make a bitmap with a grey background, so it won't be so easy to notice it is not really transparent =) Refer to http://www.lazarus.freepascal.org/mantis/view.php?id=1092 for more information on the issue. Felipe _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives
[lazarus] Re: TBitBtn and custom glyph
Graeme Geldenhuys wrote: Thanks for all the replies. For now I would prefer to use the more stable version of Laz (0.9.10). Can I convert my bmp's to another format that is currently supported in Laz with transparency? I see xpm's are also used in Lazarus - do they support transparency?. What tool can I use if it is possible? A xpm image will work, but only on Linux. On Windows the result will not be good. I think it will appear black, but I need to retest. You will also notice there are no programs on Windows that can edit .xpm files. I tryed Photoshop, fireworks, corel draw, none support xpm. xpm is the standard format for glyphs on Linux. There are 2 solutions with the 0.9.10 version: * Use the "kind" property of the button and use one of the standard glyphs, there are quite a few. They are transparent due to the unusual way they are stored and loaded. * Make a bitmap with a grey background, so it won't be so easy to notice it is not really transparent =) Refer to http://www.lazarus.freepascal.org/mantis/view.php?id=1092 for more information on the issue. Felipe _ To unsubscribe: mail [EMAIL PROTECTED] with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives