Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > C++ Builder > Базы данных FoxPro -> Builder 6.0?


Автор: Vurdilla 10.5.2006, 08:50
Люди! Помогите, пожалуйста!
Работаю в Borland C++ Builder 6.0. Нужна база данных.
На другом компьютере создаю базу данных в Visual FoxPro (выбор версий: 6.0, 8.0, 9.0).
Копирую ее на свой компьютер в определенную директорию.

Вопрос: как мне теперь через BDE получить доступ в программе у этой базе данных?
Что надо дополнительного делать на этапе создания или потом как-то регистрировать все это на компьютере, в общем - как???
Если создавать базу Paradox через Database Desktop, то проблем никаких, но там очень сильные ограничения на установление связей между таблицами, и глючит этот DBD безбожно!

Заранее спасибо!
 

Автор: Vyacheslav 10.5.2006, 09:07
Через BDE, Вы врядли сможете работать с индексами и следовательно не сможете что либо записывать или править. Вернее, сможете, но после обязательно потребуется переиндексация сторонней утилитой.
Поэтому ждя работы нужны компоненты третьих фирм, например Appollo или Advantage. Информация по Advantage есть на этом форуме в разделе "Базы данных" 
   

Автор: Vurdilla 10.5.2006, 12:22
Хорошо, тогда другой вопрос на тему, тоже касающуюся баз данных и BDE.
Открыл таблицу Paradox через TTable + TDataSourse. Хочу изменить одно из полей текущей записи вручную. Поле - S (short integer).
Как мне это сделать?
Лезу в help: используйте void __fastcall SetFields(const System::TVarRec * Values, const int Values_Size); 
Примера нет, что делать - непонятно. А хочется-то всего-то программно записать число в поле записи! 

Автор: Vyacheslav 10.5.2006, 13:27
Цитата(Vurdilla @ 10.5.2006,  12:22)
Лезу в help: используйте void __fastcall SetFields(const System::TVarRec * Values, const int Values_Size); 
Примера нет, что делать - непонятно. А хочется-то всего-то программно записать число в поле записи!

Что-то Вы с хелпом неудачно работаете? Лезу в хелп и сразу же нахожу примеры
Например, этот
Код

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Table1->Append();
  Table1->FieldValues["ALPHANUMERIC"] = Edit1->Text;
  Table1->FieldValues["INTEGER"] = StrToInt(Edit2->Text);
  Table1->Post();
}

Table1->Append() заменить на Table1->Edit() и получим редактирование
 

Автор: Vurdilla 10.5.2006, 13:59
Блин! Может, у меня help какой-то неполный, ну да ладно... Спасибо за подсказку!

Вот, кстати, может знаете, как JPEG-картинки на форму запихивать? TImage ведь только BitMap, Icon и Metafile читает, гадина. 

Автор: pandrew 11.5.2006, 11:57
посмотри справку по TJPEGImage + поиск 

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)