try..finally

[FAlter]

[ot]

Wie gesagt, ich nehm immer begin und end in solch einem Fall, da ich sonst möglicherweise selber durcheinanderkomme. In allen anderen Fällen versuch ich möglichst wenig zu schreiben also ohne Begin und end.

[/ot]

Manchmal mach ich auch sowas:

Delphi-Quellcode:

  with TBitmap.Create do
  try
    //...

    BitBlt(...); //BitBlt von {DieBitmap.}Canvas.Handle auf
                 //self.Canvas.Handle, also von der Kompo oder voms Form
  finally
    Free;
  end;

Vor allem, wenn ich zu faul bin, hochzuscrollen, um mit erstmal 'ne var Buffer: TBitmap anzulegen.