Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 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;
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat