So sollts auch gehen um Code kurz zu halten.
Delphi-Quellcode:
procedure DoIcon();
begin
Application.Icon.Handle := LoadIcon(hInstance, 'MAINICON');
InvalidateRect(Application.Handle, nil, true);
end;
Sonst müsstest Du irgendwo das "h" wieder freigeben, oder?