Я очень сильно извиняюсь, чутка ошибся - у меня процедура не является обьектом формы, поэтому небольшие изменения
Код:
unit Unit 1;
interface
uses ........;
type
TForm1= class (TForm)
...
procedure procedure1(senderL TObject); //- тут процедуры конечно же нету это ошибка,т.к. процедура моя не объект формы.
...
private
{}
pablic
{}
end;
var
Form1: TForm1;
implementation
uses ....;
{$R *.dfm}
//- процедура1 описана сразу после странной надписи $R *.dfm в фигурных ковычках -
procedure procedure1(...);
begin
...
end;//
Если процедуру запехнуть туда, куда советует nich, то
то компилятор говорит - Statement not allowed in interface part
Совет Mol-Ou тоже не подходит - модули и так у друг друга подключены, а form1.proc1 не помогает
Вопрос остался не решённым- явно в unit1 процедуру1 гдето не там надо описать где у меня.