Eine Nachrichtenschleife sieht in der einfachsten Form so aus:
Delphi-Quellcode:
var msg: tagMSG;
while GetMessage(msg, 0, 0, 0) do
DispatchMessage(msg);
Die müsstest du dann einbauen, wenn der Timer laufen soll. Beenden kannst du die Nachrichtenschleife mit PostQuitMessage(0). Meine hellseherischen Fähigkeiten sagen mir allerdings, dass ein TTimer nicht die beste Lösung für dein Problem ist - jetzt müsste ich nur noch das Problem kennen.
Wofür willst du den Timer verwenden?