Delphi knowledgebase

Featured Articles

» How can I add the item into system menu?

By hongbin fei | Published 06/18/2006 | Forms | Rating:

Sometimes I must insert a new items into system menu of some form. I think that I such not one...

full story

printer version

» How to install a no source component

By hongbin fei | Published 06/6/2006 | VCL | Rating:

How to install a no source component? At fact, it is no guide from borland, so I write this.

full story

printer version

» How to print a word document from delphi

By hongbin fei | Published 05/27/2006 | Objects/ActiveX | Unrated

sometimes, we need print a word document from delphi,this code can guide you.

full story

printer version

» How to Change the Colors of the TProgressBar

By hongbin fei | Published 04/20/2006 | Forms | Rating:

The TProgressBar Delphi component displays a simple progress bar. Progress bars provide users with visual feedback about the progress of a procedure within an application.

full story

printer version

» How to Right Align a Menu Item?

By hongbin fei | Published 04/1/2006 | Forms | Rating:

In most applications all (top level) menu items are aligned at the left side of the menu bar. I'm sure you have seen applications with at least one item aligned on the right side. In most cases this was the "Help" menu item.

full story

printer version

» How can I change a line type for drawing

By hongbin fei | Published 04/1/2006 | Graphics | Rating:

In some applications you must draw the line where each pixel is some shape. The MS Windows allows to draw line of such type - you must use the LineDDA funtion. This function needs a callback function that is called for each pixel drawing. Of course in this callback function you can realize the any drawing routines.

full story

printer version

Recent Articles

» How to make a circle form

By Thomas Kim | Published 07/5/2006 | Forms | Unrated

var
MyForm : HRGN;

procedure TForm1.FormCreate(Sender : TObject);
begin
MyForm : =CreateEllipticRgn(0 0 Width Height);
SetWindowRgn(Handle MyForm TRUE);
end;

procedure TForm1.FormDestroy(Sender : TObject);
begin
DeleteObject(MyForm);
end;

printer version

» How to execute another application?

By hongbin fei | Published 06/10/2006 | Kylix | Unrated

how to execute another application under kylix(linnux)?

please read the code after press [full story]

full story

printer version

» Disable ctrl+N in TWebbrowser?

By hongbin fei | Published 06/9/2006 | Internet/LAN | Unrated

// Put a TApplicationEvents component on your form and assign a OnMessage event handler:

procedure TfrmMyBrowser.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
// check if Ctrl-N pressed
if (GetKeyState(VK_CONTROL) < 0) and (Msg.Message = WM_KEYDOWN) and
(Msg.wParam = Ord('N')) then
begin
Handled := True;
end;
end;

printer version

» How to get the local DNS servers list?

By hongbin fei | Published 06/9/2006 | Internet/LAN | Rating:

we need know the DNS server in your program,this code can help you.

full story

printer version

» How to open an URL in the Default Webbrowser?

By hongbin fei | Published 06/9/2006 | Internet/LAN | Unrated

uses
ShellApi;

{....}

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle,
               'open',
               'http://www.mytips123.com',
               nil,
               nil,
               SW_SHOW);
end;

printer version