Сообщения без ответов | Активные темы


Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 2317 • Страница 65 из 116 • <  1 ... 62  63  64  65  66  67  68 ... 116  >
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
  cj_remix

Member
Статус: Не в сети
Регистрация: 14.08.2004
Откуда: Москва
Daemon
Подправил код :)
Реклама

Партнер
  Daemon

Member
Статус: Не в сети
Регистрация: 14.01.2004
Откуда: Киев, Украина
cj_remix всеравно всю картину сложно представить, но опять же:
Код:
interface
uses DataWork;
implementation

procedure openf(var name:string);

Объявить прототип openf нужно в секции interface, возможно это нужно сделать и с DataW.

_________________
Ку ку

  cj_remix

Member
Статус: Не в сети
Регистрация: 14.08.2004
Откуда: Москва
Daemon
кажется понял....
в юните DataWork надо в interface написать
Код:
procedure DataW(var a:TextFile);

тогда ругается на
openf('C:\1.txt');
в голове..
пишет тоже самое...
Добавлено спустя 40 секунд
опередил.. сейчас попробую
Добавлено спустя 9 минут, 53 секунды
Daemon
Спасибо большое, точно, в этом косяк :)

Я сюда ещё вернусь походу, т.к. прога терь вешается на другой теме.. Но тут я пока сам помучаюсь :)
  RUMBok

Member
Статус: Не в сети
Регистрация: 27.06.2005
Вопрос один назрел:
В Delphi вычисляются данные, передать их в Excel и сразу там построить график по ним. Как часть с Excel провернуть?

_________________
Если ты такой умный - отчего же не богатый?!

  Aleksoid1978

Member
Статус: Не в сети
Регистрация: 02.03.2005
Откуда: Владивосток
RUMBok писал(а):
Вопрос один назрел:
В Delphi вычисляются данные, передать их в Excel и сразу там построить график по ним. Как часть с Excel провернуть?


А можно поиском воспользоватся или как ??? Поищи в этой теме - уже вставал такой вопрос. Или google.com.ru->Delphi+Excel ...))
  Zеrg

Member
Статус: Не в сети
Регистрация: 03.01.2003
Откуда: Ростов-на-Дону
Код:
var XLApp : variant;
begin
XLApp := CreateOleObject('Excel.Application');
XLApp.DisplayAlerts := false;
XLApp.Workbooks.Add;

XLApp.WorkBooks[1].WorkSheets[1].Cells[1,1]:='Zerg'
....
....
....

XLApp.Workbooks[1].WorkSheets[1].Name:='Zerg';
XLApp.WorkBooks[1].SaveAs('d:\zerg.xls');
XLApp.Workbooks.Close;
XLApp.Quit;
end;

_________________
Just Zerg! Остановим деградацию русского языка, скажем нет удафкомовской лексике!!

  Vovikk

Member
Статус: Не в сети
Регистрация: 29.06.2004
Откуда: Мурманская обл.
Как подружить Delphi 7 и MySQL 5? Что-нибудь типа ZeosLib. И желательно бесплатно.
  Zеrg

Member
Статус: Не в сети
Регистрация: 03.01.2003
Откуда: Ростов-на-Дону
Vovikk Бесплатно говоришь :) Ну в голову только ZeosLib приходит (хотя проблем с ним....) и TMySQL
http://www.productivity.org/projects/tmysql/

_________________
Just Zerg! Остановим деградацию русского языка, скажем нет удафкомовской лексике!!

  Vovikk

Member
Статус: Не в сети
Регистрация: 29.06.2004
Откуда: Мурманская обл.
Zеrg
ZeosLib найти немогу для 5й версии MySQL. На сайте разработчиков лежит последняя версия 6.какая-то, поддерживает только до 4й версии MySQL.
Может я не в том месте искал?
  Zеrg

Member
Статус: Не в сети
Регистрация: 03.01.2003
Откуда: Ростов-на-Дону
Vovikk https://sourceforge.net/projects/zeoslib

Только тут...

_________________
Just Zerg! Остановим деградацию русского языка, скажем нет удафкомовской лексике!!

  Vovikk

Member
Статус: Не в сети
Регистрация: 29.06.2004
Откуда: Мурманская обл.
Zеrg
Да, к сожалению, обновления небыло уже почти год...
Может быть есть что-то "условно" бесплатное? Или даже платное, готов купить, если ничего другого не останется.
  Daemon

Member
Статус: Не в сети
Регистрация: 14.01.2004
Откуда: Киев, Украина
Я вот непонимаю, а что ODBC или OleDb уже отменили? :)

_________________
Ку ку

  Zеrg

Member
Статус: Не в сети
Регистрация: 03.01.2003
Откуда: Ростов-на-Дону
Vovikk
Вот ещё могу посоветовать, AnyDAC.
http://www.da-soft.com/Download.html

Цитата:
v 1.1.0 (21.06.05)
+ added MySQL 5.0.6, 5.0.7 compatibility

_________________
Just Zerg! Остановим деградацию русского языка, скажем нет удафкомовской лексике!!

  Vovikk

Member
Статус: Не в сети
Регистрация: 29.06.2004
Откуда: Мурманская обл.
Daemon
ODBC неудобен в использовании. На каждом клиентском компьютере, где будет стоять программа надо настраивать ODBC. А если таких компьютеров 150? В случае с ZeosLib достаточно просто подложить в папку с программой одну небольшую dll'ку.
  Aleksoid1978

Member
Статус: Не в сети
Регистрация: 02.03.2005
Откуда: Владивосток
Vovikk писал(а):
Zеrg
ZeosLib найти немогу для 5й версии MySQL. На сайте разработчиков лежит последняя версия 6.какая-то, поддерживает только до 4й версии MySQL.
Может я не в том месте искал?


Все нормально пашет - Delphi 7+последний Zeos+MySql 5(тоже последний)
Добавлено спустя 7 минут, 37 секунд
Совсем забыл - два месяца нормально писал проги юзая вышеуказанную связку, но буквально пару дней назад столкнулся с такой проблемой, сперва кусок кода:

Код:
ZQuery1.Active:=False;
ZQuery1.SQL.Clear;
ZQuery1.SQL.Add('SELECT * FROM cars ORDER BY id;');
ZQuery1.Active:=True;
...
Form1.ZQuery1.Edit;
for i:=0 to 9 do begin
  Form1.ZQuery1.FieldByName('url'+IntToStr(i)).AsString:='none';
end;
for i:=0 to TeSListBox1.Items.Count-1 do begin // Не больше 9
  Form1.ZQuery1.FieldByName('url'+IntToStr(i)).AsString:=TeSListBox1.Items[i];
end;
Form1.ZQuery1.Post;


Работает как-то странно - иногда после всей этой операции данные не сохраняются в базу, а в DbGrid отображаются, а после Refresh - старые данные; специально смотрел Базу с помощью Navicat - точно, в проге сделал Post а данные не занеслись, но в DbGrid показываются.

В чем может быть трабл ???
  Cthulhu

Aleksoid1978
Возможно проблемма в банальной транзакции. Т.е. банально выполнен SET AUTOCOMMIT=0. Тогда надо или вручную коммитить, или перевести в режим AUTOCOMMIT
  Vovikk

Member
Статус: Не в сети
Регистрация: 29.06.2004
Откуда: Мурманская обл.
Aleksoid1978
При попытке соединения с базой выбрасывает ошибку, мол обновите клиента.
есть у тебя libmysql50.dll? или с libmysql40.dll работает?
  Aleksoid1978

Member
Статус: Не в сети
Регистрация: 02.03.2005
Откуда: Владивосток
Vovikk писал(а):
Aleksoid1978
При попытке соединения с базой выбрасывает ошибку, мол обновите клиента.
есть у тебя libmysql50.dll? или с libmysql40.dll работает?


А ты какой протокол указываеш в ZConnection - лично я юзаю MySql, и да, вот еще что - libmysql.dll я беру и из папки MySql копирую в
Windows\System32\ , т.е. я юзаю родную dll MySql, а не та что идет в комплекте Zeos
Добавлено спустя 1 минуту, 21 секунду
Cthulhu писал(а):
Aleksoid1978
Возможно проблемма в банальной транзакции. Т.е. банально выполнен SET AUTOCOMMIT=0. Тогда надо или вручную коммитить, или перевести в режим AUTOCOMMIT


Попробую - отпишусь, а то так не хочется переходить на AnyDAC - просто привык уже к Zeos
Добавлено спустя 18 минут, 8 секунд
Cthulhu писал(а):
Aleksoid1978
Возможно проблемма в банальной транзакции. Т.е. банально выполнен SET AUTOCOMMIT=0. Тогда надо или вручную коммитить, или перевести в режим AUTOCOMMIT


В свойствах ZConnection.AutoCommit=True
  Vovikk

Member
Статус: Не в сети
Регистрация: 29.06.2004
Откуда: Мурманская обл.
Aleksoid1978
Цитата:
А ты какой протокол указываеш в ZConnection - лично я юзаю MySql, и да, вот еще что - libmysql.dll я беру и из папки MySql копирую в
Windows\System32\ , т.е. я юзаю родную dll MySql, а не та что идет в комплекте Zeos

Попробовал сделать так-же.
SQL Error: Client does not support authentification protocol requested by server; consider upgrading MySQL client.
Опять та-же ошибка.
  Aleksoid1978

Member
Статус: Не в сети
Регистрация: 02.03.2005
Откуда: Владивосток
Vovikk писал(а):
Aleksoid1978
Цитата:
А ты какой протокол указываеш в ZConnection - лично я юзаю MySql, и да, вот еще что - libmysql.dll я беру и из папки MySql копирую в
Windows\System32\ , т.е. я юзаю родную dll MySql, а не та что идет в комплекте Zeos

Попробовал сделать так-же.
SQL Error: Client does not support authentification protocol requested by server; consider upgrading MySQL client.
Опять та-же ошибка.


А какая версия Zeos и MySql ???
Добавлено спустя 3 минуты, 24 секунды
Всем спасибо сам разобрался со своей проблемой - Zeos+Delphi7+MySql 5 - оказалось банально просто: одно из полей типа Timestamp и галочка типа автоматом при update измениться, так вот если не делать ZQuery.Refresh после Post, то это поле не считывалось и уже после первого апдейта остальные не проходили, пока не сделаеш рефреш.

Вот так бывает.
Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 2317 • Страница 65 из 116 • <  1 ... 62  63  64  65  66  67  68 ... 116  >
-

Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 7

Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan