Delphi-Quellcode:
type
TUKunden = class(TForm)
.....
private
FKundennummer: string;
procedure SetKundennummer(const AValue: string);
public
property Kundennummer read FKundennummer write SetKundennummer;
end;
implementation
.....
procedure TUKunden.SetKundennummer(const AValue: string);
begin
FKundenummer := AValue; // BREAKPOINT HIER SETZEN
end;
Vor dem eigentlichen Aufruf von
FirstKundenSuchen
dem property Kundennummer den zu suchenden Wert zuweisen und es dann als Parameter mitgeben. Sollte irgendein Event oder Thread die Kundennummer einstweilen verändern, dann stehst Du beim Breakpoint und kannst den Callstack untersuchen.
HTH (hope that helps)