Klassen-Vervollständigung - Aus Felder auch Prozeduren

[DocBorn]

Hallo ertstmal,
also ich habe jetzt eine Beispiel-Klasse deklariert:

Delphi-Quellcode:

type
  TAccountInfo = class
    FAccountName: String;
    FName: String;
    FPassword: String;
  public
  private
  end;

Kann ich Delphi jetzt irgendwie dazu anweisen für jedes Feld eine SET-Prozedur und eine GET-Funktion zu schreiben also am Beispiel des Feldes FAccountName:

Delphi-Quellcode:

procedure setAccountName(Value: String);
begin
  FAccountName := Value;
end;

function getAccountName: String;
begin
  Result := FAccountName;
end;

und das halt für alle Felder? Wäre ja schon massig-praktisch :)

Lg Lars

[SirThornberry]

welche Delphiversion hast du denn?

[bttb930]

Versuchs mal so:

Delphi-Quellcode:

type
  TAccountInfo = class
  public
    property AccountName: String;
    property Name: String;
    property Password: String;
  end;

Und dann drück STRG-Shift-C während der Cursor zwischen class und end ist.

ich glaube da passiert etwas in der Art...

[DocBorn]

@sir: Ich habe Delphi 5 Enterprise

@bttb: Ist das denn nachher von der Performance her das gleiche?

Danke schonmal für die Tips.

Lg Lars

[alzaimar]

Zitat:

Zitat von DocBorn

@bttb: Ist das denn nachher von der Performance her das gleiche?

Mach Dir darüber einfach keine Gedanken. Verwende lieber die richtigen Algorithmen und schreibe lesbare Programme. An der Performance kannst Du bei guter Programmierung auch noch hinterher feilen.

[DocBorn]

alles klärchen

danköö