Проблема с программой

Тема в разделе "Delphi - Базы данных", создана пользователем Djarlax, 25 апр 2008.

Статус темы:
Закрыта.
  1. Djarlax

    Djarlax Гость

    Репутация:
    0
    У меня такая проблема, делаю программу для переноса данных из таблицы формата dbf в таблицу
    на MySQL сервере.
    Подключаюсь к таблицам, для проверки помещаю на форму компоненты DBGrid, всё нормально,
    таблицы отображаются. Пишу процедуру:

    Код (Text):
    procedure TForm1.Button3Click(Sender: TObject);
    var i: integer;
    begin
    Table1.Active:=true;
    ZConnection1.Connected:=true;
    ZTable1.Active:=true;
    Table1.First;
    while not Table1.Eof do
    begin
    ZTable1.Insert;
    for i:=0 to Table1.Fields.Count-1 do
    begin
    ZTable1.FieldByName(Table1.FieldDefs[i].Name).Value := Table1.Fields[i].Value;
    end;
    ZTable1.Post;
    Application.ProcessMessages;
    Table1.Next;
    end;
    Table1.Active:=false;
    ZTable1.Active:=false;
    ZConnection1.Connected:=false;
    end;
    Запускаю программу, ошибки не выдаёт, в DBGrid если не закрывать соединение в ходе выполнения программы
    отображается таблица с новыми значениями из таблицы dbf , но после закрытия данные
    исчезают. Захожу на MySQL сервер, таблица не изменилась, данные не переносятся.
    Подскажите в чём ошибка? Может в компонентах какие параметры поменять или дописать что-то нужно,
    чтобы данные сохранялись?
     
  2. Djarlax

    Djarlax Гость

    Репутация:
    0
    Подскажите как избавиться от возникновения ошибки "Переполнение стека", возникает она у меня когда я нажимаю на полосу прокрутки в компоненте DBGrid, в который выводится таблица, сформированная SQL запросом.
     
Загрузка...
Похожие Темы - Проблема программой
  1. _alexis_
    Ответов:
    4
    Просмотров:
    73
  2. Lisenok
    Ответов:
    19
    Просмотров:
    267
  3. thunder
    Ответов:
    1
    Просмотров:
    122
  4. SevenEight
    Ответов:
    0
    Просмотров:
    126
  5. imendan
    Ответов:
    13
    Просмотров:
    281
Статус темы:
Закрыта.

Поделиться этой страницей