FreePascal.ru

Нашел как решить, если кому надо - ставите компонент utf8process и в командной строке пишите...

wmic diskdrive get serialnumber, для wmic много разных команд можно найти в нете.

Добрый денек.

Захотел привязать прогу для хранения паролей к диску.

Вопрос такой: Как получить ид или номер диска, флешки. (hdd, sdd, usb)

Благодарю за помощь.

Нашел пример в сети, но он выдал ошибку...

https://www.rodina-ru.com/rabota-i-khobbi/programmirovanie/poluchit-serijnyj ...

Я в таких случаях подхожу к первому попавшемуся столбу и спрашиваю у него, потом к следующему столбу, а к вечеру мозг начинает соображать.

s:=chr(41);
обратная функция - ord
i:=ord('a');
Но незабываем что в utf8 присутствуют "составные" символы переменной длинны

Zub Вопрос читайте внимательнее

разобрался сам


s:='=46=61=6D=69=6C=69=61=D0=98=D0=BC=D1=8F=D0=9E=D1=87=D0=B5=D1=81=D1=82=D0=B2=D0=BE';
i:=1;
s2&#58 ...

Всем доброго утра! (Опять уже утро )

Хотел найти модуль для работы с vcf (vcard) но не нашел.
Как хорошо что приходят умные мысли...

Вопрос такой - как utf8 код преобразовать в utf8 символ.

т.е. пример из таблицы - 65 U+0041 41 A Latin Capital Letter A
где 41 - это код символа, а A - это сам ...

Добрый день!

Вопросик такой.

При запуске программы все нормально, но после загрузки строк в listview компоненты перестали реагировать на изменение размеров формы (правая привязка).
При этом если строк для загрузки мало то все ок, а если много то вот такие проблемы.

Подскажите кто в курсах ...

зачем? Или вы думаете так быстрее ? Да, так как пойск идет с начала лок. файла и самая первая строка всегда будет той, которая нужна.

Добавлено спустя 3 минуты 30 секунд:
что имелось ввиду? Всё локализируется стандартными средствами.
Вот это блеять и имелось ввиду. Что если надпись на кнопке ...

Ваш вариант не "хлещет" великолепностью. Т.е. в цикле искать в stringlist компонент... Хотя бы beginupdate воспользовались. Если "тяжкая" форма будет будут и тормоза.
stringlist заполняется данными из файла, и да, в цикле ищется значение нужных (tag=0) текстовых свойств компонентов формы, при этом ...

Чем штатное то не угодило? Там проще некуда. Всё чуть ли не мышкой нащёлкивается. Да и языковые ресурсы потом править - есть куча навороченных редакторов po-файлов. Мне не понравилось, описание на wiki не смог разобрать, + Вы пишите - куча редакторов, и Вы же понимаете, что с этой кучей надо ...

Добрый день!

Хочу поделиться с вами свойм вариантом локализации приложений.
Те что я нашел в лазарусе показались мне очень сложными, поэтому решил придумать свой вариант, который использую уже в своей программе.
В приложении тестовая программа и модуль.

Буду рад комментариям и доработкам.

Конечно ...

resident писал(а):Папка
C:\Users\[USER_NAME]\AppData\Local\lazarus
существует?

Нет диск с полностью форматнул когда переустанавливал винду.

Добрый день!
После переустановки винды в лазаре исчезли многие компоненты.
Когда пробовал их переустановить возникает одна и таже ошибка при инсталяции пакетов

registerfcl.pas(43,3) Fatal: Can not find unit ServiceManager used by RegisterFCL. Check if package richmemopackage is in the dependencies ...

Здравствуйте Дорогие участники форума.
Решил с Вами поделиться.
Реализовал в своей программе окно благодарностей и решил с Вами поделиться.

Как Вы заметили в коде при переключении вкладки приходиться задавать заново позиции меток. Не знаю с чем это связано, но если этого не делать метки уезжают.

Буду признателен, если напишешь об этом в выше указанном блоге А то люди так и застаряли в r3400
ок
Кстати, если ты планируешь написать чат-приложение, то рекомендую ознакомится с проектом "inline" в папочке "samples".
Нет, сейчас работаю над другим (выложу, как доделаю (в конце года)). inline ...

Спасибо, с репозитория установилось корректно, функция тоже работает!


procedure TForm1.Button1Click(Sender: TObject);
var
s: string;
i: integer;
begin
i:=rich.GetTextLen;
InsertColorStyledText(rich, 'зелёная строка'+IntToStr(i)+#13#10, clGreen, []);
end ...