Форум: "Основная";
Текущий архив: 2002.12.30;
Скачать: [xml.tar.bz2];
ВнизOle объекты Найти похожие ветки
← →
Лана Розанова (2002-12-19 11:38) [0]В 5-й версии код
var
mcp:Variant;
...
if (VarIsEmpty(mcp)) then
mcp:=CreateOleObject("WinCC-Runtime-Project");
работает, а вто в 6-й версии нет...
if (VarIsEmpty
(mcp)) then
mcp:=CreateOleObject("WinCC-Runtime-Project");
Вот это он не понимает.
Что делать СПАСИБО!!!
← →
Skier (2002-12-19 11:47) [1]в d6 есть модуль Variants.pas
Его используешь ?
← →
Digitman (2002-12-19 11:55) [2]можно и вот так :
if (TVarData(mcp).VType <> varDispatch) then
mcp:=CreateOleObject("WinCC-Runtime-Project");
← →
Лана Розанова (2002-12-19 13:01) [3]Digitman ©
Привет, как дела. У меня пока все нормально.
← →
Лана Розанова (2002-12-19 13:07) [4]Digitman
А как быть с этим?
if (Not VarIsEmpty(mcp)) then
begin
Value.Text:=mcp.GetValue(Name.Text);
end
← →
Digitman (2002-12-19 13:16) [5]>Лана Розанова © (19.12.02 13:01)
> У меня пока все нормально.
Рад за тебя)
> А как быть с этим?
> if (Not VarIsEmpty(mcp)) then
А точно так же !
if (TVarData(mcp).VType = varDispatch) then
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.30;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c