Delphi knowledgebase - Articles

Sound card - installed or not

hongbin fei — Mon, 05 Mar 2007 00:00:00 CST

If you write multimedia software that requires an installed sound card, of course you must check if some sound card is installed

Automating Internet Explorer to POST Form Data

hongbin fei — Sat, 06 Jan 2007 00:00:00 CST

Automating Internet Explorer to POST Form Data

How to color a specific subitem in a TListView

hongbin fei — Wed, 20 Dec 2006 00:00:00 CST

do you wang change the color of a specific subitem in a TListView.

Effective bug processing : the right code at the right place

Robert Sampy — Sat, 16 Dec 2006 00:00:00 CST

How to use the power of Application.OnException event to integrate an automatic bugreport in few code lines.

Antialiased line drawer

hongbin fei — Sun, 10 Dec 2006 00:00:00 CST

How do I draw smooth lines in my apps like photoshop?

Activate/Deactivate the Screen Saver

hongbin fei — Sat, 14 Oct 2006 00:00:00 CDT

Sometimes you want to deactivate the current screensaver when performing some very long process. You can use this function to activate or deactivate the screensaver. Pass True to activate it, or False to deactivate it.

What different between LogWidth LogHeight and Font.Size?

hongbin fei — Mon, 11 Sep 2006 00:00:00 CDT

There are LogWidth,LogHeight,LogUse and Font.size, what is mean? It is scable for you.

How to get TMyGroupShape's instance count?

hongbin fei — Fri, 01 Sep 2006 00:00:00 CDT

procedure TForm1.Button3Click(Sender: TObject);
var i,j:integer;
begin

   j:=0;
    for i:=0 to MyCAD1.GetShapesCount - 1 do
     With MyCAD1 do
     begin

      if (MyShapes[i] is TMyGroup) and ( MyShapes[i].ParentShapeNo = -1 ) then
       inc(j);
    end;
    form1.Caption:='There is '+inttostr(j)+ ' group shapes!';
end;

end.

How can I know the mouse over TCAD or not.

hongbin fei — Tue, 29 Aug 2006 00:00:00 CDT

sometime we need know the mouse over TCAD or not. please should view this sample.

How to hide a hot link point

hongbin fei — Sat, 05 Aug 2006 00:00:00 CDT

In inspector,set ShowHotLink property value as False.

Also,set value by code.

Code example:

procedure TMainFrm.Button1Click(Sender: TObject);
begin
MyCAD1.ShowHotLink:=false;
//...
end;