Трансляция строки из VBA(Word) в Delphi

[grb1zli]

Здравствуйте.
Помогите транслировать следующую строку написанную в VBA(word)
Selection.Information(wdFirstCharacterColumnNumber)
в код на Delphi, если объявленная переменная имеет вид
MsWord:Variant.
Спасибо!

[RXL]

Будет выглядеть точно также.

[grb1zli]

пробовал так не работает выдает ошибку:"Project Project1.exe raised exception class EOleException with message "Information' не является методoм'.... "

[RXL]

grb1zli, какой вопрос задаешь, такой ответ и получаешь...

В VBA строка ведь не сама по себе, а в контексте.

[grb1zli]

Если другой способ узнать эту информацию Selection.Information(wdFirstCharacterColumnNumber)?

Добавлено через 9 минут и 13 секунд:

Код:

procedure Word.Poisk(nachalo,konez:string);
var n_strok,n_slb,n_stran,k_strok,k_slb,k_stran:integer;
begin
MsWord.Selection.Find.ClearFormatting;
MsWord.Selection.Find.Text := 'по курсу "';
MsWord.Selection.Find.Replacement.Text:= '';
MsWord.Selection.Find.Forward:= True;
MsWord.Selection.Find.Wrap:= 2;
MsWord.Selection.Find.Format:= False;
MsWord.Selection.Find.MatchCase:= False;
MsWord.Selection.Find.MatchWholeWord:= False;
MsWord.Selection.Find.MatchWildcards:= False;
MsWord.Selection.Find.MatchSoundsLike:= False;
MsWord.Selection.Find.MatchAllWordForms:= False;
MsWord.Selection.Find.Execute;
MsWord.Selection.MoveRight(1,1);
n_slb:=MsWord.Selection.Information(9);//Функция работает вот до этой строчки