Последние записи
- Модуль числа |a| без условных операций на CMD
- Как копировать текст из блока в буфер обмена?
- Получение ProductKey установленной Windows
- Как парсить https сайт ?
- Смена регистра строки текста на BAT (CMD)
- Вывод разноцветного текста на BAT (CMD)
- Узнать дату окончания сертификата
- Как создать полноценный сайт на Open Server
- Получить температуру процессора на bat-файлах
- Динамические массивы в Lazarus / Delphi — индексация элементов
Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk
Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw
16th
Янв
Как парсить https сайт ?
Как парсить https сайт? В http получается, но https не парсит.
var
IdHTTP: TIdHTTP;
StrPars,St :string;
s:Tstringlist;
begin
s:=TStringList.Create;
IdHTTP:=TIdHTTP.Create(Self);
s.text:=IdHTTP.Get('http://........./');
StrPars:=s.text;
Delete(StrPars,1,pos('<td>',StrPars)+1);
st:=copy(StrPars,3,pos('</td>',StrPars)-3);
label1.Caption:=(St);
end;
19th
Дек
Узнать дату окончания сертификата
Есть куча *.cer файлов. Как программно узнать дату окончания сертификата?
23rd
Ноя
Динамические массивы в Lazarus / Delphi — индексация элементов
Привет, приведите листинг примера создания динамического символьного массива (занесения к примеру элементы: Катя, Петя, Лена и вывод одного из них скажем в Memo1 )
13th
Ноя
Дата и время изменения файла
Мне нужно в ячейку StringGrid поместить дату и время изменения файла
Делаю это так:
function ReadDate(FN:String):String
var
W: WideString; // полное имя файла
Dat:TDateTime;
FHandle: Integer;
begin
W:=FN;
FHandle := FileOpen(w, 0);
Dat:= FileDateToDateTime(FileGetDate(FHandle));
Result:= FormatDateTime('yyyy.mm.dd.hh.nn.ss', Dat);
end;
Однако, полученное время отличается от видимого в свойствах файла (в проводнике)
Например:
получено 2008.08.26.19.42.02
в свойствах 26.08.2008 20:42
То есть, ровно на час (если файл был изменен за час до нового года, то на год)
Что интересно, если дату изменения вернуть назад функцией FileSetDate,
то дата в свойствах файла становится на час моложе (прибавляется час)
Сам вопрос:
Можно ли не особенно исхитряясь получить дату съемки полностью соответствующую таковой в свойствах файла.
Если нельзя, то как выяснить (программно) региональные настройки Windows и как их использовать для коррекции полученной даты (нужно их как-то преобразовать, а затем сложить или вычесть…)
15th
Авг
Передать фокус элементу до отображения формы по ShowModal
Хотел сделать такой вот код, но он выдал ошибку в процессе исполнения
E.SetFocus;
If F.ShowModal ...
Где E — TEdit на форме F
Вопрос: как сделать фокус на E при том что я запускаю форму через ShowModal?
20th
Июл
Управление компонентами интерфейса
Delphi7.
На форме есть Panel на ней лежат компоненты StatusBar и Button.
При выполнении Panel.Enabled:=false
компоненты уже не реагируют на нажатия но визуально они не меняются на серые
Нужно что бы при отключении панели было визуально видно что все компоненты лежащие на ней стали не активны.
Как такое реализовать малой кровью?
17th
Июн
Проиграть wav
Как мне проигрывать wav так, чтоб можно было контролировать воспроизведение. Собственно нужно только PLAY и STOP.
(читать всё…)
23rd
Май
Сделать выполнение кода в определенные часы
Мне требуется выполнять некий код в программе в определенные часы.
К примеру ставим диапазон 20-12. Это значит что код будет выполняться каждую минуту с 20 часов вечера по 12 часов дня (следующего)
23rd
Апр
Передача в функцию произвольного набора чисел (на разных языках программирования)
Нужно объявить массив с заполнением моими значениями.
Var Temp: array[0..7] of Byte = (1, 4, 0, 210, 0, 56, 81, 225);
компилятор не принимает с ошибкой Canon initialize local variables
таже конструкция но как Const работает
Var Temp : Array[0..7] Of Byte;
Begin
Temp := (1, 4, 0, 210, 0, 56, 81, 225);
тоже не принимается компилятором
Так работает но мне не удобно так описывать
Temp[0]:=1;
Temp[1]:=4;
Temp[2]:=0;
…..
Облако меток
ассемблер timer TBitMap select SaveToFile ShellExecute программы массив советы word MySQL SQL ListView pos random компоненты дата LoadFromFile form база данных сеть html php RichEdit indy строки Win Api tstringlist Image мысли макросы Edit ListBox office C/C++ memo графика StringGrid поиск canvas файл Pascal форма Файлы интернет Microsoft Office Excel excel winapi журнал ПРОграммист DelphiКупить рекламу на сайте за 1000 руб
пишите сюда - alarforum@yandex.ru
Да и по любым другим вопросам пишите на почту

пеллетные котлы

Пеллетный котел Emtas
Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)


