Текущий архив: 2005.12.04;
Скачать: CL | DM;

Вниз

convert type   Найти похожие ветки 

← →
john_mag ©   (2005-11-14 12:37) [0]

Не могу справиться со следующей ошибкой:

Could notconvert variant of type (String) into type (Double)

Ошибка выскакивает после первой проверки условия. Текст начинается с цифры 2.

procedure TForm1.Button8Click(Sender: TObject);
var
 Unit_,Count,Extend: OleVariant;
 i: integer;
 y: Variant;
begin
i:= 0;
Repeat
Unit_:= wdCharacter;
y:= Unit_;
Count:= i+1;
Extend:= wdExtend;
WordApplication1.Selection.MoveRight(Unit_,Count,Extend);
Until y <> "@";
end;

---

← →
КиТаЯц ©   (2005-11-14 12:59) [1]

wdCharacter что такое?

---

← →
john_mag ©   (2005-11-14 13:40) [2]

енто константа переменной Until_ , которая обозначает любой символ. Так же и wdWord-слово, wdSentence-предложение и тд.

---

Страницы: 1 вся ветка

Текущий архив: 2005.12.04;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.059 c