У тебя там при старте программы никакие транзакции не открываются случаем которые потом по умолчанию отроликаваются(roolback)?
Может, открываются, но вот с чего бы им откатываться. Я не вижу причин.
P.S Проверил, да действительно проблема была в транзакциях. Выставил коммит по дефолту и прописал ...
Найдено 28 результатов
- 09.10.2015 16:08:05
- Форум: Общее
- Тема: SQL и CREATETABLE
- Ответы: 6
- Просмотры: 19504
- 09.10.2015 11:21:14
- Форум: Общее
- Тема: SQL и CREATETABLE
- Ответы: 6
- Просмотры: 19504
Re: SQL и CREATETABLE
EdtInSQL.text какую строку содержит?
Содержит самое простое CREATE TABLE NeWTable (date datetime)
query.SQL.Add('CREATE TABLE if not exists user(user_id integer NOT NULL AUTO_INCREMENT, user_name text (50), PRIMARY KEY(user_id)) DEFAULT CHARSET=utf8;)
какие компоненты используешь ...
- 09.10.2015 09:17:25
- Форум: Общее
- Тема: SQL и CREATETABLE
- Ответы: 6
- Просмотры: 19504
SQL и CREATETABLE
Я что-то, не понял, как правильно создать таблицу например в базе MSSQL. Следующий код создает таблицу но после выхода из приложения в базе её нету.
SqlConnBuilderForm.SQLQuery2.SQL.Clear;
SqlConnBuilderForm.SQLQuery2.SQL.Text:=EdtInSQL.text;
SqlConnBuilderForm. ...
SqlConnBuilderForm.SQLQuery2.SQL.Clear;
SqlConnBuilderForm.SQLQuery2.SQL.Text:=EdtInSQL.text;
SqlConnBuilderForm. ...
- 22.09.2015 05:54:57
- Форум: Lazarus
- Тема: WIN1251 в БД
- Ответы: 20
- Просмотры: 16220
Re: WIN1251 в БД
В лазарусе 0.9.26 при подключении к firebird 1.5 в компоненте IBConnection устанавливаю свойство CharSet = WIN1251
Для правильного отображения кириллицы в гриде (DBGrid-DataSource-TSQLQuery-IBConnection) достаточно
в свойство грида onDrawColumnCell добавить
procedure TForm1.DBGrid1DrawColumnCell ...
Для правильного отображения кириллицы в гриде (DBGrid-DataSource-TSQLQuery-IBConnection) достаточно
в свойство грида onDrawColumnCell добавить
procedure TForm1.DBGrid1DrawColumnCell ...
- 07.03.2013 16:27:09
- Форум: Lazarus
- Тема: Перевод проекта Delphi на Lazarus
- Ответы: 16
- Просмотры: 11968
Re: Перевод проекта Delphi на Lazarus
Какие это 5 строк и на чем ?
На том, что у Вас уже есть. Если Вы используете компонент TDbf, то перекодировка будет выглядеть примерно так:
Dbf1.First;
Dbf1.Edit;
For i:=0 To Dbf1.RecordCount-1 Do
Dbf1.FieldByName('Текстовое_поле').AsString:=ConsoleToUtf8(Dbf1. ...
На том, что у Вас уже есть. Если Вы используете компонент TDbf, то перекодировка будет выглядеть примерно так:
Dbf1.First;
Dbf1.Edit;
For i:=0 To Dbf1.RecordCount-1 Do
Dbf1.FieldByName('Текстовое_поле').AsString:=ConsoleToUtf8(Dbf1. ...
- 04.11.2012 17:00:08
- Форум: Разработки на нашем сайте
- Тема: MSSQL и SyBase
- Ответы: 23
- Просмотры: 48194
Re: MSSQL и SyBase
Пока использую вариант "слойка", подключаюсь через ODBC.
- 04.11.2012 16:55:20
- Форум: Lazarus
- Тема: Создание DLL (Различается между Lazarus и Delphi)
- Ответы: 35
- Просмотры: 29822
Re: Создание DLL (Различается между Lazarus и Delphi)
Даже в Delphi вызов классов VCL из dll вызывал много вопросов и проблем. В Lazarus - это очень сложно, потому что:
1) LCL гораздо более "тяжелый" и менее стабильный, чем VCL.
2) Компиляция dll в FreePascal - вообще очень проблемная задача. Собрать-то можно, но вот работоспособность никто не ...
1) LCL гораздо более "тяжелый" и менее стабильный, чем VCL.
2) Компиляция dll в FreePascal - вообще очень проблемная задача. Собрать-то можно, но вот работоспособность никто не ...
- 03.11.2012 10:01:18
- Форум: Lazarus
- Тема: Создание DLL (Различается между Lazarus и Delphi)
- Ответы: 35
- Просмотры: 29822
Создание DLL (Различается между Lazarus и Delphi)
Есть исходник написанной DLL на Delphi 7, возникла необходимость перенести на Lazarus. Все компилируется но вот вызвать из программы Окно из своей DLL не получается, либо ничего не происходит (функции ничего не возвращают будто не экспортируются), либо Access Violation. Перелопатил весь интернет ...
- 01.11.2012 20:02:56
- Форум: Разработки на нашем сайте
- Тема: MSSQL и SyBase
- Ответы: 23
- Просмотры: 48194
Re: MSSQL и SyBase
Весь инет облазил. И весь BagTrack в поисках возможности подключится к MSSQL (Нужные мне версии начиная от 2000, 2002, 2005, возможно еще 2008) MSSQLConnect в Lazarus 1.1 + FPC 2.7.1 не работает видать он слишком сырой. И тут натыкаюсь на этот компонент ну думаю а вдруг он то сможет подключится ...
- 07.05.2012 11:22:48
- Форум: Lazarus
- Тема: Отображение картинки в DBImage
- Ответы: 5
- Просмотры: 4443
Re: Отображение картинки в DBImage
Может я ошибаюсь но здесь можно обойтись и без потока и BmRead.
- 27.03.2012 12:37:33
- Форум: Lazarus
- Тема: Ошибки при создании компонента
- Ответы: 4
- Просмотры: 3759
Re: Объясните новичку.
whs Как то ошибки не соответствуют приведённым выше.
unit1.pas(53,15) Warning: An inherited method is hidden by "TScrollingCredits.SetVisible(const Boolean);"
unit1.pas(44,15) Error: Forward declaration not solved "TScrollingCredits.ResetAnimation;"
unit1.pas(51,15 ...
unit1.pas(53,15) Warning: An inherited method is hidden by "TScrollingCredits.SetVisible(const Boolean);"
unit1.pas(44,15) Error: Forward declaration not solved "TScrollingCredits.ResetAnimation;"
unit1.pas(51,15 ...
- 23.03.2012 20:46:57
- Форум: Lazarus
- Тема: Ошибки при создании компонента
- Ответы: 4
- Просмотры: 3759
Re: Объясните новичку.
whs код читать лень. А где же всё таки текст ругань?
(41,15)Warning: An inherited method is hidden by "TScrollingCredits.SetVisible(const Boolean);"
(148,30) Error: Wrong number of parameters specified for call to "TimerFired"
(50,15) Hint: Found declaration: TScrollingCredits.TimerFired(TObject ...
(41,15)Warning: An inherited method is hidden by "TScrollingCredits.SetVisible(const Boolean);"
(148,30) Error: Wrong number of parameters specified for call to "TimerFired"
(50,15) Hint: Found declaration: TScrollingCredits.TimerFired(TObject ...
- 23.03.2012 15:23:04
- Форум: Lazarus
- Тема: Ошибки при создании компонента
- Ответы: 4
- Просмотры: 3759
Ошибки при создании компонента
Решил опробовать создание компонентов для Lazarus, но видать что-то не до конца понимаю.
unit ScrollingCredits;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, LResources,Forms, Controls, Graphics, Dialogs,ExtCtrls;
type
{ TScrollingCredits }
TCreditEvent = procedure(Sender : ...
unit ScrollingCredits;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, LResources,Forms, Controls, Graphics, Dialogs,ExtCtrls;
type
{ TScrollingCredits }
TCreditEvent = procedure(Sender : ...
- 07.01.2012 15:12:06
- Форум: Lazarus
- Тема: Использование внешней DLL для работы с M$ Word
- Ответы: 75
- Просмотры: 75793
Re: Использование внешней DLL для работы с M$ Word
Думал что у меня пример не работает выложенный, при открытии DBF файла (которые хранятся с одной старой программой), а проблема в пути к файлу оказалась (Не любит изначально на кириллице файлы видеть) Путь вида :
E:\Софтина бугалтерская\UMC_XBK\DBF\DOKU0508.dbf
- 11.03.2011 07:19:22
- Форум: Lazarus
- Тема: Тестирование версии 0.9.29
- Ответы: 92
- Просмотры: 72169
Re: Тестирование версии 0.9.29
sobee писал(а):Все желающие могут скачать здесь ftp://ftp.hu.freepascal.org/pub/lazarus ... es/Lazarus Windows 32 bits/Lazarus 0.9.30
У меня по ссылке ошибка 550. Такчто лучше заходить по ftp://ftp.hu.freepascal.org/pub/lazarus/releases а там уже переходить самому.
