kann man dieses Problem mit Anonymen Methoden besser lösen , in der Art wie ....
Delphi-Quellcode:
procedure ShowHourGlass(Proc: TProc);
var
OldCursor: TCursor;
begin
OldCursor := Screen.Cursor;
Screen.Cursor := crHourGlass;
try
Proc;
finally
Screen.Cursor := OldCursor
end;
end;
man müsste dann eine Unmenege An Functionsprototypen deklarien und hätte lange ÜbergabeListen ..... ist dies nicht sehr unschön
anderseits immer den selben code in eine UI Funktion eintippen ... auch nicht schön