Undeclared identifier: 'AW'

[pashka_dos]

Доброго дня, написал процедуру, при компиляции ошибка:
Undeclared identifier: 'AW' (AW - имя компонента типа TWordAplication, компонент на форме есть).
И самое интересное, что если код процедуры вставить в Буттон1.Клик, то ошибки нет, и все прекрасно рабатает.

procedure kolontitul(s: string);
var filename:OLEVariant;
begin
CopyFile(PChar(extractfilepath(Application.ExeName)+s),PChar(extractfilepath(Application.ExeName)+'temp.doc'),false);
filename:=extractfilepath(Application.ExeName)+'temp.doc';
AW.Connect;

AW.Documents.Open(FileName, EmptyParam,  EmptyParam,  EmptyParam, EmptyParam, EmptyParam, EmptyParam,  EmptyParam, EmptyParam, EmptyParam,  EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);
DW.ConnectTo(AW.ActiveDocument);

AW.Options.CheckSpellingAsYouType := False;
AW.Options.CheckGrammarAsYouType := False;
  {colon:=aw.ActiveDocument.Sections.Item(1).Footers.Item(1).Range;
  colon.Tables.Item(1).Cell(4,2).Range.Text:=data[1];
  colon.Tables.Item(1).Cell(5,2).Range.Text:=data[2];
  colon.Tables.Item(1).Cell(6,6).Range.Text:='Ãðóïà '+data[3];
  colon.Tables.Item(1).Cell(4,4).Range.Text:=dt;
  colon.Tables.Item(1).Cell(5,4).Range.Text:=dt; }
AW.Visible:=true;
Dw.Disconnect;
Aw.Disconnect;
end;

Тыкните носом, пожалуйста, где неправильно))

[Larboss]

Вероятно AW описан после процедуры колонтикул. Весь код скиньте глянуть.

Если компилятор говорит, что не знает, что есть AW, значит он действительно не знает

[Luuzuk]

Вместо AW.Connect; Пишите Form1.AW.Connect;

Или заголовок процедуры измените с procedure kolontitul(s: string); на procedure TForm1.kolontitul(s: string); Но тогда придется описание процедуры еще в начало файла (туда же, где и всякие Button1Click) добавить

Область видимости переменных не совпадает

[pashka_dos]

Сообщение от Luuzuk

Вместо AW.Connect; Пишите Form1.AW.Connect;

Или заголовок процедуры измените с procedure kolontitul(s: string); на procedure TForm1.kolontitul(s: string); Но тогда придется описание процедуры еще в начало файла (туда же, где и всякие Button1Click) добавить

Область видимости переменных не совпадает

Ок спасибо, дальше сам разберусь.

[pashka_dos]

Сообщение от Luuzuk

Вместо AW.Connect; Пишите Form1.AW.Connect;

Или заголовок процедуры измените с procedure kolontitul(s: string); на procedure TForm1.kolontitul(s: string); Но тогда придется описание процедуры еще в начало файла (туда же, где и всякие Button1Click) добавить

Область видимости переменных не совпадает

Беда! А как же мне теперь вызвать процедуру? Теперь ошибка: Undeclared identifier: 'kolontitum' при вызове процедуры tefxButton2Click

Вот весь код

[phomm]

Вы наверное, издиваетесь...

Сообщение от pashka_dos

procedure kolontitul(s: string);

Сообщение от pashka_dos

БИда! Undeclared identifier: 'kolontitum'

И код я проверил, там действительно нет kolontituL в коде а только ColontituM, ну а в описании процедуры именно колонтитуЛ, это кстати говорит о том что Вы и ошибку не по конкретно выложенному коду указываете, а по какой-то другой версии.

Я бы Вам посоветовал бросать это дело - не Ваше, уж простите, Вы на такой ерунде горите... не знаете как пользоваться не то что основами дельфи, но даже работе в самой среде, а уже работаете с кодом на десятки килобайт, ну разве что, очередное учебное задание...

[pashka_dos]

Сообщение от phomm

Вы наверное, издиваетесь...




И код я проверил, там действительно нет kolontituL в коде а только ColontituM, ну а в описании процедуры именно колонтитуЛ, это кстати говорит о том что Вы и ошибку не по конкретно выложенному коду указываете, а по какой-то другой версии.

Я бы Вам посоветовал бросать это дело - не Ваше, уж простите, Вы на такой ерунде горите... не знаете как пользоваться не то что основами дельфи, но даже работе в самой среде, а уже работаете с кодом на десятки килобайт, ну разве что, очередное учебное задание...

Извините за беспокойство, это просто невнимательность, наверное, не выспался...