Показать сообщение отдельно
  #6  
Старый 31.10.2012, 12:49
helgboy helgboy вне форума
Прохожий
 
Регистрация: 30.10.2012
Сообщения: 33
Репутация: 10
По умолчанию

Тут сказывается мое плохое понимание для работы с классами
Код:
type
  Tmain = class(TForm)
procedure keyctrl();
procedure Nperemennoy();
end;

var
....
implementation

begin
procedure Tmain.keyctrl();
begin
writedata;   // обявлено в другом модуле  mod.pas
writeln(ft,' x='+inttostr(x)); //
Nperemennoy();// Необходим вызов этой функции... как сделать правильно?
end;
 
procedure Tmain.Nperemennoy();
begin
...
end;
.....
end.

Вот нужно переделать походу чтоб функция keyctrl не присваивалась к классу главной формы и тем не менее могла сама вызывать Nperemennoy();
а также без проблем вызываться из библиотеки.
Ответить с цитированием