Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - Eigenschaften von TObjekt in Prozeduren
Zuckerrübe - Sa 27.06.09 13:27
Titel: Eigenschaften von TObjekt in Prozeduren
Hallo zusammen,
ich würde gerne wissen, wie ich in einer Prozedur eine Eigenschaft von einem TObjekt abfragen kann.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| procedure stringaenderung(a: string);
var i: integer;
b: string;
begin
For i:= 1 to length(a) do
begin
if a = 'a' then
b:= b + 'b';
end;
Memo1.Text:= b; |
Die Funktion dieser Prozedur ist unwichig. Mir ist nur die Zeile 11 wichtig, wie ich den string in dem Memo ausgeben kann.
danke im vorraus
Delete - Sa 27.06.09 13:36
Wenn es eine allgemeingültige Prozedur sein soll, würde ich das so machen:
Delphi-Quelltext
1:
2:
3:
4:
| procedure stringaenderung(a: string; const ResultList: TStrings);
begin
...
ResultList.Text:= b; |
Die Memo.Lines kannst Du dann im Parameter ResultList übergeben.
platzwart - Sa 27.06.09 13:54
oder eben Form1.Memo1.Text:= b;, wenn die Funktion nicht zu Form1 gehört bzw. Form1.Memo1.Lines.Add(b);
Delete - Sa 27.06.09 14:00
In dem Fall ist aber IMO eine Methode von Form1 die elegantere Alternative.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!