Since you have the ability to make your own DataBases with Delphi you can consider making a Delphi DB of all your Delphi code. I have made such a DB and I also use Delphi Newsgroups, so when I find a piece of information on a Newsgroup I add it to my Delphi DB for later use, this keeps all your important pieces of Delphi code all in the same place and easy to get at. Adding FIND to the Delphi DB helps so you can find a piece of Delphi data fast.

To insert the Date and Time in a Text Editor(Memo):

procedure TNotesForm.Date1Click(Sender: TObject);
begin
  Memo1.SelText := (FormatDateTime('ddd, mmm d, yyyy ', Now));
end;
procedure TNotesForm.Time1Click(Sender: TObject);
begin
  Memo1.SelText := (FormatDateTime('hh:mm AM/PM ', Now));
end;

To make a Panel Visible or Invisible (Toggle Switch):

procedure TNotesForm.ToolButton11Click(Sender: TObject);
begin
  If Panel1.Visible = True then
     Panel1.Visible := False
  else
     Panel1.Visible := True;
end;

To load a Help File:

procedure TNotesForm.Help1Click(Sender: TObject);
begin
  Application.HelpFile := 'Edit.HLP';
  Application.HelpJump('TApplication_HelpJump');
end;

Paste from Clipboard:

procedure TNotesForm.Paste1Click(Sender: TObject);
begin
  Memo1.PasteFromClipboard;
end;

Copy to the Clipboard:

procedure TNotesForm.Copy1Click(Sender: TObject);
begin
  Memo1.CopyToClipboard;
end;
 
 

All of the above Delphi code has been tried in Delphi 3.
If you would like to add some small helpful pieces of Delphi code to this page please feel free to e-mail me and I will add the code with your name.

DPR Delphi Programmers' Ring This DPR site owned by James Sandbrook. DPR Buttons were designed with actual Delphi components.