skip to main | skip to sidebar

Coding Delphi Land

Welcome to Coding Delphi Land collection of free programming Delphi Source Code - Delphi is one of the best programming tools to create software for Windows.

With Delphi you can without much effort create small yet powerful Windows applications, which do not need to be installed, do not depend on Active X controls, or special dlls. This means that you will have far fewer users complaining about installation problems than if you created your software using Java, .NET, Visual Basic or Visual C++. Besides, many quality Delphi freeware, shareware and open source components can be found on the Web. See also below.

Minggu, 15 November 2009

Set And Get Mouse Position

procedure TForm1.Button1Click(Sender: TObject);
var
MausPos: TPoint;
begin
GetCursorPos(MausPos);
label1.Caption := IntToStr(MausPos.x);
label2.Caption := IntToStr(MausPos.y);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
SetCursorPos(600, 600);
end;