oka-saphelp.blogspot.com

oka-delphitips.blogspot.com

Delphi Tips & Trick: Making a transparent form

http://oka-delphitips.blogspot.com/2008/03/making-transparent-form.html

Delphi Tips and Trick. Delphi Tips and Trick. Enter your search terms. Friday, March 7, 2008. Making a transparent form. Add a Button (Button1) to a Delphi form (Form1). Procedure TForm1.FormCreate(Sender: TObject) ;. FullRgn, ClientRgn, ButtonRgn: THandle;. Margin, X, Y: Integer;. Margin := (Width - ClientWidth) div 2;. FullRgn := CreateRectRgn(0, 0, Width, Height) ;. X := Margin;. Y := Height - ClientHeight - Margin;. X, Y, X ClientWidth, Y ClientHeight) ;. X := X Button1.Left;. Y := Y Button1.Top;.

oka-delphitips.blogspot.com

Delphi Tips & Trick: Shape a form to a bitmap

http://oka-delphitips.blogspot.com/2008/03/shape-form-to-bitmap.html

Delphi Tips and Trick. Delphi Tips and Trick. Enter your search terms. Friday, March 7, 2008. Shape a form to a bitmap. Fill bitmap to Form. Windows, Classes, SysUtils, Graphics, Forms;. PRGBArray = TRGBArray;. CreateRegion(Bmp: TBitmap): THandle;. TForm1.CreateRegion(Bmp: TBitmap): THandle;. X, Y, StartX: Integer;. BmpPixelFormat := pf24Bit;. Result := CreateRectRGN(0, 0, Bmp.Width, Bmp.Height);. Y := 0 to. BmpHeight - 1 do. Row := Bmp.Scanline[Y];. StartX := -1;. Y = 0 then. TransparentColor := Row[0];.

oka-delphitips.blogspot.com

Delphi Tips & Trick: March 2008

http://oka-delphitips.blogspot.com/2008_03_01_archive.html

Delphi Tips and Trick. Delphi Tips and Trick. Enter your search terms. Monday, March 24, 2008. Free Yahoo Robot Messenger is auto response Yahoo Mess program. Message Response taking from database. This program is free using Bricksoft IM(MSN,YAHOO,AIM) VCL Component(Unregistered Version). For download program please klik. Http:/ www.2shared.com/file/3035373/be70d67c/ymrobot.html. Http:/ www.2shared.com/fadmin/3035373/8c972f85/ymrobot.zip. Friday, March 7, 2008. Shape a form to a bitmap. Y := 0 to. Making...

oka-delphitips.blogspot.com

Delphi Tips & Trick: know if the form is modal

http://oka-delphitips.blogspot.com/2008/03/know-if-form-is-modal.html

Delphi Tips and Trick. Delphi Tips and Trick. Enter your search terms. Friday, March 7, 2008. Know if the form is modal. TForm1.Button1Click(Sender: TObject);. ShowMessage('Form is modal.');. Subscribe to: Post Comments (Atom). Shape a form to a bitmap. Making the Enter Key act like Tab (Delphi Tips). Know if the form is modal. Execute the Windows Explorer Find File Dialog Box. Making a transparent form. There was an error in this gadget. Simple template. Powered by Blogger.

oka-delphitips.blogspot.com

Delphi Tips & Trick: Execute the Windows Explorer Find File Dialog Box

http://oka-delphitips.blogspot.com/2008/03/execute-windows-explorer-find-file.html

Delphi Tips and Trick. Delphi Tips and Trick. Enter your search terms. Friday, March 7, 2008. Execute the Windows Explorer Find File Dialog Box. The following example demonstrates using DDE to execute Explorer's find file dialog. The example opens the dialog in the Directory "C: DelphiTips". Procedure TForm1.Button1Click(Sender: TObject) ;. With TDDEClientConv.Create(Self) do begin. ConnectMode := ddeManual;. ServiceApplication := 'explorer.exe';. SetLink( 'Folders', 'AppProperties') ;.

oka-delphitips.blogspot.com

Delphi Tips & Trick: Making the Enter Key act like Tab (Delphi Tips)

http://oka-delphitips.blogspot.com/2008/03/making-enter-key-act-like-tab.html

Delphi Tips and Trick. Delphi Tips and Trick. Enter your search terms. Friday, March 7, 2008. Making the Enter Key act like Tab (Delphi Tips). This code gives the key the same habbit as the key to. Change focus between Controls. TForm1.FormKeyPress(Sender: TObject; var. Key = #13 then. Key := #0;. Check if SHIFT - Key is pressed }. PostMessage(Handle, WM NEXTDLGCTL, 1, 0). PostMessage(Handle, WM NEXTDLGCTL, 0, 0);. February 3, 2012 at 10:04 AM. Subscribe to: Post Comments (Atom). Shape a form to a bitmap.