В одномерный массив введены цифры целого положительного числа М в восьмеричной системе счисления. Количество цифр в числе известно и дано N (N- не более 10). Напечатать восьмеричное представление числа М+7. Предусмотреть проверку правильности ввода информации.

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

Как присвоить значения. У меня идет расчет по формуле, и нужно присвоить значение из радиобаттона.

Var S,h,K,a,b:Real;
begin
S:=StrToFloat(edt2.Text);
h:=StrToFloat(edt1.Text);
K:=

Вот к данному K присвоить цифру выбранную в радибаттоне, все радиобаттоны расположены в GroupBox.

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

Вопрос такой, имеется Edit1 с текстом, когда пользователь кликает по Edit1, данный текст пропадает, и в поле можно ввести любой текст…
Вопрос вот какой, как выловить условие, что Edit1 потерял фокус?

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

Если у CheckBox стоит галочка, то в таблицу записывается: «Пополнение в группу», если не стоит, то ничего не записывается.
На Form есть CheckBox и Button, программу запустили нажали на него, т. е. поставили галочку, нажали кнопочку «ок», в таблицу в определенное поле записалась эта фраза: «Пополнение в группу».

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

Проверить симметрична ли матрица А (7,7) относительно главной диагонали.

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

Дано натуральное число n. Вычислите сумму s=2*2+3*4+4*6+5*8+6*10+…+n*2+*(n-1).

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

Дана матрица А (m,n), элементы которой целые числа. Напишите программу, которая находит и выводит на экран наименьший элемент матрицы, а так же номер строки и номер столбца, соответствующие этому элементу.

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

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

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

Есть 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 то выполнить запрос …

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