Delphi

Get the name of the day today!

Here is an example of what the function returns: ‘The day today is ‘ + daytoday+’.’ Returns on a monday: The day today is Monday. Here is the function: function daytoday: string; begin Result:=”; {Can […]

Delphi

Better moving form

unit Unit1; interface uses   Windows,   Messages,   Forms; type   TForm1 = class(TForm)   protected     procedure WMNCHitTest(var Msg: TWMNCHitTest); message WM_NCHITTEST;   end; var   Form1: TForm1; implementation {$R *.DFM} procedure TForm1.WMNCHitTest(var Msg: TWMNCHitTest); begin   // Call default procedure   inherited; […]

Delphi

Change String To Proper Case

NOTE:Make sure to add “StrUtils” to your Uses section function properCase(sBuffer: string):string; var iLen, iIndex: integer; begin iLen := Length(sBuffer); sBuffer:= Uppercase(MidStr(sBuffer, 1, 1)) + Lowercase(MidStr(sBuffer,2, iLen)); for iIndex := 0 to iLen do begin […]

Delphi

Understanding the Basics of Delphi Programming

Beginner developers eager to master the Delphi programming language should already be familiar with the basics of Microsoft Windows. Learning Delphi is easiest if you approach it from a guided, tutorial-based frame of reference. Foundational Concepts Get started […]