VPF::Помогите разобраться - Форум программистов

Allexander

Дата 1.7.2006, 21:42 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 40
Регистрация: 14.6.2006

Репутация: нет
Всего: нет

Точнее помогите перевести с Delphi на C++Builder вот такой код

Код


procedure TForm1.SpeedButton5Click(Sender: TObject);
var 
  WordApp: _Application; 
  Dlg: Dialog; 
begin
  if re.Text='' then exit;
  WordApp := CoWordApplication.Create;
  WordApp.Documents.AddOld(EmptyParam, EmptyParam); 
  WordApp.Visible := True; 
  Dlg := WordApp.Dialogs.Item(wdDialogToolsCreateEnvelope); 
  OleVariant(Dlg).AddrText :=remindex+#13+remstreet;
  Dlg.Show(EmptyParam);
end;

586

Дата 2.7.2006, 22:24 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2243
Регистрация: 8.5.2006

Репутация: 57
Всего: 146

Код

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  _Application *WordApp;
  Dialog *Dlg;

  if re.Text.IsEmpty() return;
  CoWordApplication::Create(&WordApp);
  WordApp->Documents->AddOld(EmptyParam, EmptyParam);
  WordApp->Visible=true;
  Dlg=WordApp->Dialogs->Item(wdDialogToolsCreateEnvelope);
  // ??? OleVariant(Dlg).AddrText :=remindex+#13+remstreet;
  Dlg->Show(EmptyParam);
}

Перевёл все что смог.
Неасилил 11 строку: OleVariant(Dlg).AddrText :=remindex+#13+remstreet;
ОБъясни подробнее, как она работает, может мереведу.

Это сообщение отредактировал(а) 586 - 3.7.2006, 18:01

Allexander

Дата 3.7.2006, 08:12 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 40
Регистрация: 14.6.2006

Репутация: нет
Всего: нет

OleVariant(Dlg).AddrText :=remindex+#13+remstreet;
remindex и remstreet переменные типа String они передают в открытый диалог печати конверта значения адрес и индехкс
тоест эта строка заполняет даннные об адресате в конверте

586

Дата 4.7.2006, 08:44 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2243
Регистрация: 8.5.2006

Репутация: 57
Всего: 146

OleVariant(Dlg).AddrText :=remindex+#13+remstreet;

Каким образом, Dlg взаимодействует с (remindex+#13+remstreet)?
Как понимать OleVariant(Dlg).AddrText? Dlg конвертируется, или String(remindex+#13+remstreet)?

Allexander

Дата 4.7.2006, 13:01 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 40
Регистрация: 14.6.2006

Репутация: нет
Всего: нет

Да в том и проблема что и сам непонимаю нашел пример кода на Delphi как это делается а в C++Bilder Немогу перевести еслиб там хоть описание было бы smile

Allexander

Дата 4.7.2006, 22:27 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 40
Регистрация: 14.6.2006

Репутация: нет
Всего: нет

AddrText это свойство Worda строка ввода поля адресата. а remindex,remstreet это посто строки

Nasgool

Дата 11.7.2006, 10:06 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 11.7.2006

Репутация: нет
Всего: нет

Я или тупой или чего то непонимаю , был у меня C++Builder6 - на нем я без проблем делал файлы командной строки (писал код с книги и компилировал).... потом то дело забросил ...
Поставил BUILDERX и решил тоже самое делать - только почему - то ничего не выходит
Поставил исходники библиотеки QT там есть готовые файлы форматы Pro/ H/ CPP/, открываю их , а там такое при компиляции ........... smile

"main.cpp": ../../../../000/Process/main.cpp qapplication.h: No such file or directory at line 10, column 26
In file included from ../../../../000/Process/main.cpp:11:
"Shell.h": ../../../../000/Process/Shell.h qlineedit.h: No such file or directory at line 13, column 23
"Shell.h": ../../../../000/Process/Shell.h qtextedit.h: No such file or directory at line 14, column 23
"Shell.h": ../../../../000/Process/Shell.h qlabel.h: No such file or directory at line 15, column 20
"Shell.h": ../../../../000/Process/Shell.h qpushbutton.h: No such file or directory at line 16, column 25
"Shell.h": ../../../../000/Process/Shell.h parse error before `{' token at line 22
"Shell.h": ../../../../000/Process/Shell.h syntax error before `*' token at line 26
"Shell.h": ../../../../000/Process/Shell.h parse error before `(' token at line 35
"Shell.h": ../../../../000/Process/Shell.h `readyReadStdout' was not declared in this at line 46
и короче все это в том-же духе... smile

BreakPointMAN

Дата 11.7.2006, 12:12 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 725
Регистрация: 15.9.2004
Где: Saratov

Репутация: 6
Всего: 24

Nasgool, ознакомься с правилами форума.

Цитата

Правила форума, которые обязаны ВСЕ соблюдать:
...
10) Запрещается создание сообщения с несколькими вопросами. На каждый вопрос должна создаваться отдельная тема. В случае возникновения таких тем, администрация форума оставляет за собой право изменить текст сообщения, удалить его или закрыть тему.

Что касается непосредственно твоего вопроса, ответь: что именно ты пытаешься компилировать? куда ты разместил все эти файлы? установил ли соответствующие пути в настройках компилятора?

--------------------

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »