Na ja, versprechen werde ich nichts. Aber eins kann ich dir jetzt schon sagen: Du solltest mal über deinen Stil nachdenken. Bei so einem Ding hier
Delphi-Quellcode:
function dlgfunc(hDlg: hWnd; uMsg: dword; wp: wParam; lp: lParam): bool; stdcall;
var HitHandle: HTreeItem; tv: TTVItem; buf: array[0..MAX_PATH]of char;
rc: TRect; i: Integer;
const SB_SIMPLEID= $00FF; MINX = 500; MINY = 350;
fCheckState: array[boolean]of cardinal = (0,MF_CHECKED);
sieht doch kein Mensch mehr durch.
Oder war das der Versuch, meinen und Luckies Code so unkenntlich wie möglich zu machen, damit man nicht merkt woher du ihn hast? 
Spricht was gegen:
Delphi-Quellcode:
function dlgfunc(hDlg: hWnd; uMsg: dword; wp: wParam; lp: lParam): bool;
stdcall;
var
HitHandle : HTreeItem;
tv : TTVItem;
buf : array[0..MAX_PATH]of char;
rc : TRect;
i : Integer;
const
SB_SIMPLEID = $00FF;
MINX = 500;
MINY = 350;
fCheckState : array[boolean]of cardinal = (0,MF_CHECKED);
Klar, das belegt mehr Zeilen. Aber auf dein Programm hat das keinen Einfluss. Und es sieht übersichtlicher aus. Also: Eine vernünftige Gliederung und ab und zu mal eine Leerzeile schadet nicht. Im Gegenteil ...
Schön ist auch, wenn du dir den rechten Rand von 80 Zeichen anzeigen lässt und diesen nach Möglichkeit nicht überschreitest. Wenn doch mal jemand den Quellcode ausdruckt, dann hat er keine Probleme.