Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.217 Beiträge
 
Delphi 12 Athens
 
#6

Re: Anfängerfrage: TMetafileCanvas.Create

  Alt 7. Dez 2009, 20:53
Ja, mit With kann man praktisch Code kürzen, aber da sollte man aufpassen, das der Namespace nicht andere Befehle im einbeschlossenen Code verändert ... z.B. bei gleichnamigen Funktionen und Co.

z.B. kann man sich bei sowas eben auch mal 'ne Variable sparen, aber try-finally sollte auch mit rein
Delphi-Quellcode:
with TMetafileCanvas.Create(MetaGraphic, 0) do
  try
    for A := 0 to 90 do DrawSomething(A);
  finally
    Free;
  end;
nutze ichgern mal für INIs oder kleine Formulare via ShowModal
Delphi-Quellcode:
with TMyOprionDialog.Create(Self) do
  try
    ...
    // Variablen/Property befüllen
    ...
    if ShowModal = mrOK then begin
      ...
      // Rückgabewerte verarbeiten
      ...
    end;
  finally
    Free;
  end;
$2B or not $2B
  Mit Zitat antworten Zitat