![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вопрос про создание БД Access+Tables в одним действием. [D6, Access]
vegarulez © (2007-11-21 20:59:00)Привет всем мастерам! Вопрос такков
я создаю бд таким образом:
uses
...ZAbstractRODataset, ZAbstractDataset, ZDataset, ZConnection, ZSqlUpdate, ComObj;
function CreateAccessDatabase(FileName: string): string;
var
cat: OLEVariant;
begin
Result := '';
try
cat := CreateOleObject('ADOX.Catalog');
cat.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + FileName + ';');
cat := NULL;
except
on e: Exception do Result := e.message;
end;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
CreateAccessDatabase(edit1.Text);
end;
и далее добавляю в неё(в созданную БД) table вот таким образом:
procedure TForm1.Button4Click(Sender: TObject);
begin
With Zquery1 do
Begin
if Active then Close;
Sql.Text:='CREATE TABLE MyTable (id integer, TestPole1 varchar(20))';
ExecSQL();
close;
End;
end;
Теперь вопрос(ы)...
1. Можно ли как нибудь первую часть создания БД сделать с помошью Zeos компонент?
2. Как одновременно и создать БД и создать таблички в ней... Такое возможно?
vegarulez (2007-11-22 17:44:00) [1]Подскажите как тогда запихнуть её в *.res?
никогда не пользовался *.res... подскажите как это сделать.
А в экзешник как нить можно её вкомпилить?
Stanislav_ (2007-11-22 17:38:00) [2]можно как ресурс, а можно таскать за экзешником, если какие-то изменения в базе прогу ненужно перекомпиливать
vegarulez (2007-11-22 17:31:00) [3]А как я его в экзешник запихну?.. Чтоб его просто копировать...
Правильный_Вася (2007-11-22 11:01:00) [4]подготовь файл БД со всеми таблицами заранее
при необходимости просто копируй его