Hallo,
ich habe relativ komplexe eigene Objekte. Beim Debuggen kann man sich sehr schön anzeigen lassen, welche Werte in den einzelnen Eigenschaften einer Instanz aktuell vorliegen. Das würde ich gern protokollieren können.
Ein Beispiel:
Delphi-Quellcode:
TLitem = class(TObject)
Id: integer;
MasterId: integer;
Default: integer;
Key: string;
Name: string;
enabled,
checked: boolean;
function HasSelList(LB: str2): boolean;
end;
TlpList = class(TObjectList)
private
function GetLitem(aindex: integer): TLitem;
procedure SetLitem(aindex: integer; const Value: TLitem);
public
ItemIndex: integer;
ItemId: integer;
SortedById,
SortedByName: boolean;
ready: boolean;
property items[aindex: integer]: TLitem read getLitem write setLitem; default;
function Add(aLitem: TLitem): integer;
function AddDetails(aId: integer; aName: string; aIsEnabled: boolean; aEntry: TObject): integer;
...
var
L1: TlpList;
begin
L1 := TlpList.Create;
...
Nun möchte ich in verschiedenen Programmsituationen eine Hilfsroutine aufrufen, die mit L1 als Parameter aufgerufen wird und mir eine StringList mit allen aktuellen Werten in L1 liefert. Damit könnte ich mir dann eine Textdatei ausgeben.
Danke, Werner