SB
Ребятки, кто-нибудь работал с несколькими мониторами? Делал обнаружение , идентификацию дисплеев? Переставлял ли экраны средствами дельфей? Сейчас через shellexecute вызываю утилиту с параметрами, хотелось юы достучать средствами винапи и тд.
Size: a a a
2020 August 08
FT
EnumDisplaySettingsExA вот этой функции почему то нету winapi сеня смотрел
FT
Мониторы вывести могу а как управлять пока не встретил, есть Tscreen которые выводит параметры , но им управлять нельзя поресерчу еще
ДС
Добрый вечер. Пытаюсь на коленке состряпать апи для мобильного приложения. Лазарус, sqlite3, zeoslib. Застрял на ерунде. Собственно запрос в таблицу, select * from table name.
После этого нужно полученные строки запихнуть в JSON Array.
Споткнулся на получении количества строк в результате запроса для цикла формирования массива json
После этого нужно полученные строки запихнуть в JSON Array.
Споткнулся на получении количества строк в результате запроса для цикла формирования массива json
ДС
Zquery1.recordcount вызывает исключение sigчегототам
SB
Добрый вечер. Пытаюсь на коленке состряпать апи для мобильного приложения. Лазарус, sqlite3, zeoslib. Застрял на ерунде. Собственно запрос в таблицу, select * from table name.
После этого нужно полученные строки запихнуть в JSON Array.
Споткнулся на получении количества строк в результате запроса для цикла формирования массива json
После этого нужно полученные строки запихнуть в JSON Array.
Споткнулся на получении количества строк в результате запроса для цикла формирования массива json
А разве в массив json нельзя добавлять динамически? Или поменять размер?
SB
можно ещё сначала сделать select count() from ...
ДС
А вытащить этот count с запроса как? Zquery2. Fieldbyname('count') ?
ДС
Куда то документация пропала по zeos'у. Раньше вроде везде в инете валялась...
SB
EnumDisplaySettingsExA вот этой функции почему то нету winapi сеня смотрел
Функции в кодировке ANSI (название кончается на A) давно устарели. Вместо них функции W (WideString) или просто без буквы
FT
Функции в кодировке ANSI (название кончается на A) давно устарели. Вместо них функции W (WideString) или просто без буквы
Серега спасибо
SB
А вытащить этот count с запроса как? Zquery2. Fieldbyname('count') ?
Можно select count() as "num"
ДС
Можно select count() as "num"
Спасибо!
SB
Или по порядковому номеру параметра
2020 August 09
ДС
мдя... думал дело в неправильном синтаксисе запроса. Но нет. Помогите пожалуйста, кто сталкивался. В чем ошибка?
Исходные данные: сделал вот по этому туториалу https://medium.com/@marcusfernstrm/create-rest-apis-with-freepascal-441e4aa447b7 - все работает. Прикрутил роутинги - все работает. Но теперь пытаюсь сформировать настоящий ответ на запрос. Для этого нужно сделать запрос в таблицу. В программе для этого подключен unit1 с Датамодулем, компоненты zeos, БД на sqlite3. Но проблема в том, что абсолютно любая команда, связанная с Датамодулем вызывает External: SIGSEGV
Исходные данные: сделал вот по этому туториалу https://medium.com/@marcusfernstrm/create-rest-apis-with-freepascal-441e4aa447b7 - все работает. Прикрутил роутинги - все работает. Но теперь пытаюсь сформировать настоящий ответ на запрос. Для этого нужно сделать запрос в таблицу. В программе для этого подключен unit1 с Датамодулем, компоненты zeos, БД на sqlite3. Но проблема в том, что абсолютно любая команда, связанная с Датамодулем вызывает External: SIGSEGV
ДС
procedure routeParamHandler(req: TRequest; res: TResponse);
var
jObject : TJSONObject;
jArray : TJSONArray;
i, o : integer;
begin
Unit1.DataModule1.ZConnection1.Disconnect;
Datamodule1.ZConnection1.Connect;
o := DataModule1.ZQuery1.FieldByName('num').AsInteger;
var
jObject : TJSONObject;
jArray : TJSONArray;
i, o : integer;
begin
Unit1.DataModule1.ZConnection1.Disconnect;
Datamodule1.ZConnection1.Connect;
o := DataModule1.ZQuery1.FieldByName('num').AsInteger;
RS
мдя... думал дело в неправильном синтаксисе запроса. Но нет. Помогите пожалуйста, кто сталкивался. В чем ошибка?
Исходные данные: сделал вот по этому туториалу https://medium.com/@marcusfernstrm/create-rest-apis-with-freepascal-441e4aa447b7 - все работает. Прикрутил роутинги - все работает. Но теперь пытаюсь сформировать настоящий ответ на запрос. Для этого нужно сделать запрос в таблицу. В программе для этого подключен unit1 с Датамодулем, компоненты zeos, БД на sqlite3. Но проблема в том, что абсолютно любая команда, связанная с Датамодулем вызывает External: SIGSEGV
Исходные данные: сделал вот по этому туториалу https://medium.com/@marcusfernstrm/create-rest-apis-with-freepascal-441e4aa447b7 - все работает. Прикрутил роутинги - все работает. Но теперь пытаюсь сформировать настоящий ответ на запрос. Для этого нужно сделать запрос в таблицу. В программе для этого подключен unit1 с Датамодулем, компоненты zeos, БД на sqlite3. Но проблема в том, что абсолютно любая команда, связанная с Датамодулем вызывает External: SIGSEGV
Из потоков нельз обращаться к компонентам на форме, дата модулю
ДС
🤦♂️
RS
Ну про формы точно. Скорее также и c DataModule
ДС
не подскажете как тогда поступить? Как сделать запрос и получить ответ из базы?