powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Что слыхать про 4.0? Когда?
25 сообщений из 408, страница 10 из 17
Что слыхать про 4.0? Когда?
    #39782744
В аттаче - готовый Firebird.pas. Мало ли, может кому-то понадобится.
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782748
hvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик,

в линуксовом дистрибутиве беты есть готовый pas файл
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782749
Симонов Денис,

не хорошо.

1. В идентификаторах интерфейсов (файл FirebirdInterface.idl) используются зарезервированные слова паскаля, например:

Код: plaintext
1.
2.
	boolean insertRecord(const string name,
					  	 ReplicatedRecord record);



Получается вот такой паскалевский код:

Код: pascal
1.
IReplicatedTransaction_insertRecordPtr = function(this: IReplicatedTransaction; name: PAnsiChar; record: IReplicatedRecord): Boolean; cdecl;


- не компилируется.

2. Кроме того, в типах используются int16 и int32, не являющиеся для Delphi "встроенными".

3. Пустая секция const перед implementation.

4. Также используются не объявленные типы ISC_TIMESTAMP_TZ, ISC_TIME_TZ.

5. Не компилируется, т.к. не объявлены константы isc_arg_gds, isc_random, isc_arg_string, isc_arg_end. Сие, как я понимаю, следствие п.3.


В Firebird.pas, который уже есть в http://web.firebirdsql.org/downloads/prerelease/v40beta1/Firebird-4.0.0.1436-Beta1.tar.bz2 - тоже не все хорошо: п.3 и п.5 пофикшены, но остаются пп 1, 2 и 4.


Может, там, после CLOOP, что-то руками доделывать нужно?
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782889
hvladРазрабоччик,

в линуксовом дистрибутиве беты есть готовый pas файл

Тоже нерабочий:


1. В идентификаторах интерфейсов (файл FirebirdInterface.idl) используются зарезервированные слова паскаля, например:

Код: plaintext
1.
2.
	boolean insertRecord(const string name,
					  	 ReplicatedRecord record);


Получается вот такой паскалевский код:

Код: pascal
1.
IReplicatedTransaction_insertRecordPtr = function(this: IReplicatedTransaction; name: PAnsiChar; record: IReplicatedRecord): Boolean; cdecl;


- не компилируется.

2. Кроме того, в типах используются int16 и integer32, не являющиеся для Delphi "встроенными".

3. Также используются не объявленные типы ISC_TIMESTAMP_TZ, ISC_TIME_TZ.
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782891
Фотография Симонов Денис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик,

версия Delphi какая?
Во всяких там XE, Berlin... int16, int32 давно есть как алиасы стандартных типов
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782899
Симонов ДенисРазрабоччик,

версия Delphi какая?
Во всяких там XE, Berlin... int16, int32 давно есть как алиасы стандартных типов
D2007.

Ну ладно, Int16 и Integer32 - мелочь, хотя и.

Но пп. 1 и 3 - косяки.
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782914
hvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик,

пиши трекеру
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782916
Фотография Симонов Денис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик,

вот в этом файле https://github.com/FirebirdSQL/firebird/blob/master/extern/cloop/src/cloop/Generator.cpp

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
string PascalGenerator::escapeName(string name, bool interfaceName)
{
	//// TODO: Create a table of keywords.

	if (name == "file" ||
		name == "function" ||
		name == "procedure" ||
		name == "set" ||
		name == "to" ||
		name == "type")
	{
		name += "_";
	}

	if (interfaceName)
		name = prefix + name;

	return name;
}



добавь record в качестве зарезервированного. Ну а вообще надо в fbdevel написать чтобы добавили
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782931
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
РазрабоччикD2007.

Тогда просто обломись. Минимальная поддерживаемая версия, кажется, 2009-я если не вообще ХЕ.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782944
Dimitry SibiryakovРазрабоччикD2007.

Тогда просто обломись. Минимальная поддерживаемая версия, кажется, 2009-я если не вообще ХЕ.

В D2009/ХЕ в качестве имен параметров можно использовать "record" и использовать незадекларированные идентификаторы типов?
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782961
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
РазрабоччикВ D2009/ХЕ в качестве имен параметров можно использовать "record" и использовать
незадекларированные идентификаторы типов?

Понятия не имею, но это - сущие мелочи по сравнению с использованием платформозависимых
типов в этом API.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782982
Фотография Симонов Денис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик,

ты уже написал в трекер?
На самом деле именно эти два пункта можно пофиксить очень быстро.
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782990
Фотография kdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик
Дельфи 2007 неюникодная, плюс действительно старая, и не умеет компилять 64бит приложения.
Прежде чем писать что-то в трекер, нужно проверить импорт idl в соответствующих версиях (2009, ХЕ, ...)
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39782991
Симонов ДенисРазрабоччик,

ты уже написал в трекер?
На самом деле именно эти два пункта можно пофиксить очень быстро.
Да.
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39783002
Ivan_Pisarevsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39783005
Фотография kdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик,

нет там никакого 6022. последнее CORE-6021.
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39783010
hvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччик,

не надо ограничивать уровень видимости тикета без серьёзных причин
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39783011
hvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ivan_Pisarevsky,

попробуй ещё раз
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39783019
hvladРазрабоччик,

не надо ограничивать уровень видимости тикета без серьёзных причин
Не уверен даже, что я знаю, как это делать...
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39783079
hvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
РазрабоччикhvladРазрабоччик,

не надо ограничивать уровень видимости тикета без серьёзных причин
Не уверен даже, что я знаю, как это делать...
Security=Developers кто поставил ?
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39783084
hvladРазрабоччикпропущено...

Не уверен даже, что я знаю, как это делать...
Security=Developers кто поставил ?
Получается, что я. Но я не осознавал возможность негативных последствий!
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39784344
Симонов ДенисРазрабоччик,

версия Delphi какая?
Во всяких там XE, Berlin... int16, int32 давно есть как алиасы стандартных типов

В "Рио" Delphi 10.3.1 типы int16, int32 и int32 определены, а integer32 - нет.

А в Firebird.pas из "четверки" как раз integer32:

Код: pascal
1.
2.
    isc_tr_handle = ^integer32;
    isc_stmt_handle = ^integer32;


~~~~~~~~~~~~~~~~~~~~~~

А в Firebird.pas из "тройки" int16 встречается. В итоге, чтобы D2007 использовать, нужно дописывать
Код: pascal
1.
 int16 = SmallInt;



kdvДельфи 2007 неюникодная...
В Firebird.pas ничего "юникодного нет, чтобы D2007 не использовать. Добавили бы в начало пару строчек, никому бы хуже не стало:
Код: pascal
1.
2.
 int16 = SmallInt;
 int32 = Integer;
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39784363
Фотография Симонов Денис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
РазрабоччикВ Firebird.pas ничего "юникодного нет, чтобы D2007 не использовать. Добавили бы в начало пару строчек, никому бы хуже не стало:
Код: pascal
1.
2.
 int16 = SmallInt;
 int32 = Integer;



ты пробовал добавить? После этого стало работать?
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39784376
Симонов ДенисРазрабоччикВ Firebird.pas ничего "юникодного нет, чтобы D2007 не использовать. Добавили бы в начало пару строчек, никому бы хуже не стало:
Код: pascal
1.
2.
 int16 = SmallInt;
 int32 = Integer;



ты пробовал добавить? После этого стало работать?
Да, все хорошо и с D2007 и с D10.3.1:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
// Firebird 3.0.4
{ This file was autogenerated by cloop - Cross Language Object Oriented Programming }

{$IFDEF FPC}
{$MODE DELPHI}
{$OBJECTCHECKS OFF}
{$ENDIF}

unit Firebird;

interface

uses Classes, SysUtils;

type
{$IFNDEF FPC}
	QWord = UInt64;
{$ENDIF}

  Int16 = SmallInt;
  Int32 = Integer;

	IVersioned = class;
	IReferenceCounted = class;
	IDisposable = class;
	IStatus = class;
	IMaster = class;
	IPluginBase = class;
	IPluginSet = class;
...
...
Рейтинг: 0 / 0
Что слыхать про 4.0? Когда?
    #39784424
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрабоччиквсе хорошо и с D2007

Вопрос на засыпку: чему там равно sizeof(NativeInt)?
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
25 сообщений из 408, страница 10 из 17
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Что слыхать про 4.0? Когда?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]