
12.04.2013, 09:49
|
Местный
|
|
Регистрация: 09.11.2010
Сообщения: 499
Репутация: 10
|
|
Код:
procedure TFrameAction.BtnClearClick(Sender: TObject);
...
begin
...
Cleaner := TCleaner.Create(self); //<<==--!!!!!!!!!!!!
......
S := Self.Param; //<<==--!!!!!!!!!!!!
Cleaner.PathObjForClean.Add(S); //<<==--!!!!!!!!!!!!
...
не оно ?
|