На форме есть PageControl, на одной из вкладок находятся четыре Edit, на самой форме три кнопки.
Если перемещаться по Edit клавишей Tab, то после четвертого начинает шарится по кнопкам на самой форме, пройдя их все выделяет заголовок вкладки и только потом возвращается в первый Edit.
Как сделать так чтоб после четвертого возвращался сразу в первый Edit? И еще лучше, чтоб перемещение было только между четырмя эдитами. Можно так сделать?

(читать всё…)

Можно ли с помощью API функций посмотреть информацию о ресурсах устройства (диапазон памяти, IRQ и т.д.)?

(читать всё…)

Есть IP Камера Кено, которая кроме RTSP ничего не умеет, т.е. ни каких тебе http запросов для получение скрина (web интерфейс есть, но он в моем случае не нужен, так как нужно из сторонней программы получить снимок).

Вот так с vlc плейера можно смотреть поток:

rtps://192.168.0.180:554/ch0.264

Подскажите как из delphi можно подключится к этому потоку и получить из него всего 1 снимок.

(читать всё…)

Использую sqlite3.pas для работы с БД sqlite.
Возник вопрос, как корректно обрабатывать случаи, когда в таблице не содержится требуемых данных?

Если в базе нет логина test1, то при попытке выполнения запроса получаю ошибку «table is at end of file». Как такую ошибку обработать? Не выполнять же в начале запрос на подсчет количества записей с таким логином, и если > 0 то выполнить запрос …

(читать всё…)

Пользователь должен указать период (квартал — 1,2,3,4) через Inputbox. Не получатся сделать проверку введенного пользователем значения KW (квартал) — допустимые значения только 1,2,3,4.

(читать всё…)

Подсчитать количество частиц «не», пишущихся раздельно в предложении.

(читать всё…)

Дано расписание движения автобусов. Всего 18 пригородных автобусов отправляются со станции. Определить количество автобусов, отправляющихся со станции в период времени с 17.00 до 20.30. (Время отправления задается одномерным массивом.)
Сформировать пользовательский тип данных, перечислимый, в котором указаны все возможные значения времени отправления: 00.00, 00.30, 01.00, 01.30…23.00, 23.30.

(читать всё…)

Как распечатать текст из Memo?

(читать всё…)

Как записать данное выражение в Delphi?
S=(-1)^n* ((x^2n+1)/(2n+1))

(читать всё…)

Я посылаю запросы php скрипту в таком виде:

LoginInfo:TStringList;

LoginInfo:=TStringList.Create;
LoginInfo.Add('login='+St_login);
LoginInfo.Add('passw='+St_pass);
str:=idhtp1.Post(server+'yyy.php',LoginInfo);

Если сервер не доступен вылетает ошибка.
Как правильно выловить ошибку?
Т.е. если ошибка есть то сделать то то, нету другое и не останавливало программу.

Знаю про IdHTTP1.ResponseCode но как его применить не знаю.

(читать всё…)