![](/logo_grey.gif)
Последние записи
- Как в Python+Selenium webdriver открыть новую вкладку в уже открытом браузере?
- Lazarus, проверка существования строки таблице
- BASM и record, обращение к полям записи
- Web PHP Framework Symfony
- Относительный путь для вывода картинки на html странице
- Массовое открытие гиперссылок в браузере
- Скопировать значение строки из таблицы в textarea
- Рамки для страниц отчетов
- Вывод StdOut консоли в TMemo
- Чтение из файла большого размера (нехватка памяти)
![](http://programmersclub.ru/slurm3.jpg)
Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk
![](http://programmersclub.ru/katajpg.jpg)
Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw
18th
Июн
Свойство MaxLength у TEdit и кодировка UTF8
Вот какая возникла проблема. Нужно ограничить количество символов, которые может ввести пользователь в TEdit. Для этого предназначено свойство MaxLength, но оно не понимает кодировку UTF8, а именно с ней и работает Lazarus (странно, да, работает с этой кодировкой, но свойства ее не понимают).
В итоге если, скажем, прописать MaxLength := 30, то длина строки будет ограничена лишь 15 символами для русского текста.
Применил костыльное решение:
1. Установил MaxLength := 60, то есть в два раза больше, чем надо (но так оно пропустит более 30 нерусских символов).
2. На обработчик события KeyPress прописал следующее:
if (Key >= ' ') and (UTF8Length(TEdit(Sender).Text) >= 30) then Key := #0;
Оно, конечно, как-то работает, но, во-первых, это реальный костыль, а, во-вторых, работает только если вводить прямо с клавиатуры, а если скопировать длинный текст из буфера, то ограничение не сработает.
Можно, конечно, еще дополнительно проверять длину текста и обрезать его, если окажется длиннее, но это уже двойной костыль будет.
Есть ли нормальное решение проблемы?
15th
Июн
Проблемы с кодировкой в запросе через THTTPSend
Подскажите, есть скрипт на моем веб сервере. Через get запрос принимает фразу и переводит на англ.
С веб браузера скрипт отображает текст нормально, кирилица + латиница.
А с делфи (THTTPSend) ни как не могу получить ответ без кракозябр..
const
URL = 'https://.com/translate/translate.php?source=ru&target=en&text=привет';
var
HTTPs: THTTPSend;
res: TStringList;
JS:ISuperObject;
begin
HTTPs := THTTPSend.Create;
res := TStringList.Create;
HTTPs.Headers.Clear;
if not HTTPs.HTTPMethod('GET', URL) then
showmessage('internet connection: error') else
begin
res.LoadFromStream(HTTPs.Document);
JS:=SO(res.text);
Clipboard.AsText :=Utf8ToAnsi(RawByteString(res.Text));
ShowMessage(res.text);
end;
end;
Utf8ToAnsi(RawByteString( — это уже от безисходности начал варианты с интернета перебирать…
Может есть у кого совет ?
25th
Май
PostgreSQL — чтение файла
есть csv файл, в функции pgplsql прочитать этот файл и создать на его основе таблицу (заголовок csv файла), и затем заполнить эту таблицу данными из этого csv файла.
Как это сделать средствами plpgsql ? Если нельзя то какими средствами можно это реализовать в PostgreSQL ?
20th
Май
Обязательное прикрепление изображений
Как лучше сделать, чтобы при отправке формы требовалось загрузить фото?
12th
Май
Игра «Крестики-Нолики» на чистом HTML (без скриптов)
Не смотря на то, что игра не содержит ни строчки программного кода, компьютер обладает феноменальным интеллектом, обыграть его невозможно!
Всем приятной игры и стремления к победе (бесполезно)…
8th
Май
Динамическое создание массива TScrollBar
Как динамически создать массив TScrollBar, чтобы не возникло проблем?
30th
Апр
Как разместить форму в панель задач?
Хочу разместить форму в панель задач. Как мне это сделать, например, вместо часов?
25th
Апр
CMD скрипт, запустить из memo
Можно ли запустить CMD скрипт с самой программы, например с компонента memo? Как если бы запустили его посредством запуска файла .cmd ???
Нужно чтобы весь скрипт считывался с компоненты.
14th
Апр
Как узнать дату окончания сертификата
Есть куча *.cer файлов. Как программно узнать дату окончания сертификата?
Облако меток
css реестр ассемблер timer 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 форма Файлы интернет excel Microsoft Office Excel winapi журнал ПРОграммист DelphiКупить рекламу на сайте за 1000 руб
пишите сюда - alarforum@yandex.ru
Да и по любым другим вопросам пишите на почту
![пеллетные котлы](http://programmersclub.ru/respective.jpg)
пеллетные котлы
![пеллетный котел](http://programmersclub.ru/emtas.jpg)
Пеллетный котел Emtas
![форум программистов](http://programmersclub.ru/banf336х280.gif)
Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)