-
Постов
317 -
Зарегистрирован
-
Посещение
-
Победитель дней
53
dnekrasov стал победителем дня 24 сентября
dnekrasov имел наиболее популярный контент!
Информация о dnekrasov
- День рождения 21.02.1974
Информация
-
Пол
Мужчина
-
Город
Минск
Контакты
-
Skype
nekrasovdb
Посетители профиля
9 269 просмотров профиля
Достижения dnekrasov
-
Sergey S отреагировал на ответ на вопрос: Не выходит задать положение формы на планшете
-
sulion отреагировал на ответ на вопрос: Помогите начать работу с Oracle
-
dnekrasov отреагировал на ответ на вопрос: Не получается скачать файл по https
-
Android отреагировал на ответ на вопрос: Кто-нибудь щупал TMS Web Core?
-
Пробовал я и TMS Web Core и UniGUI, но как по мне - лучше чем Thinfinity VirtualUI нет. И да, реально на всех получаются неплохие веб-приложения на Delphi без знания всех этих новомодных фреймворков.
-
#WAMACO отреагировал на ответ на вопрос: HTML парсер для Firemonkey
-
Alisson R Oliveira отреагировал на ответ на вопрос: HTML парсер для Firemonkey
-
Barbanel отреагировал на ответ на вопрос: HTML парсер для Firemonkey
-
Ingalime отреагировал на ответ на вопрос: HTML парсер для Firemonkey
-
как-то так uses System.RegularExpressions; ... const AHREF = '<a href="([^"]*)"[^>]*>([^<]*)</a>'; var Match: TMatch; s: String; begin Match := TRegEx.Match(ваша HTML строка, AHREF); while Match.Success do begin // здесь что-то делаем //<a href"...>...</a> в Match.Value //Match.Groups[1] - адрес ссылки //Match.Groups[2] - отображаемый текст ссылки Match := Match.NextMatch; end; end
-
dnekrasov отреагировал на ответ на вопрос: Расположение нажатого элемента управления по отношению к экрану
-
Сложно что-то ответить не имея стиля и проекта. Если скинете стиль и какой-либо тестовый проект с одной этой формой - можно будет продолжить беседу...
-
Может проблема в StyledSettings?
-
Да, она только у TCommonCustomForm. До неё можно добраться так: function GetOwnerForm: TCommonCustomForm; var ctrl: TComponent; begin Result := nil; ctrl := Self.Owner; while Assigned(ctrl) and not (ctrl is TCommonCustomForm) do ctrl := ctrl.Owner; if Assigned(ctrl) and (ctrl is TCommonCustomForm) then Result := ctrl as TCommonCustomForm; end;
-
Ну как я могу ответить на этот вопрос? Я не знаю ни что Ваша программа делает, ни что Вы хотите добить ся этим потоком, что такое Reopen, Add, как вы работаете с базой и т.д... Кстати, насчет базы. Когда-то я сталкивался с такой ситуацией (правда это было ADO и под винду): если ADOConnection был создан в главном потоке, то UI зависал всегда (даже когда запрос выполнялся в отдельном)
-
dnekrasov отреагировал на ответ на вопрос: Symbol 'Release' is deprecated
-
dnekrasov отреагировал на сообщение в теме: Разработка кросплатформенных приложений в одном проекте
-
dnekrasov отреагировал на ответ на вопрос: Rio 10.3. Выделение текста в TText
-
Ingalime отреагировал на ответ на вопрос: компонент – Индикатор("лампочка")
-
Лучше TPaintBox или TShape вообще лучше не делать - размер холста задаётся автоматом в зависимости от размеров контрола переопределите функцию GetDefaultSize: TSizeF Вы контрол рисуете полностью сами, значит inherited тут не надо А вообще - посмотрите исходники TCircle-TEllipse-TShape - всё станет намного понятнее.
-
Ingalime отреагировал на ответ на вопрос: Посоветуйте компонент-контейнер
-
TScrollBox?
-
Илья Ненашев отреагировал на ответ на вопрос: GlowEffect на кнопке
-
Может кто подскажет, как в MacOS Catalina добавить пункт в меню "Share", с ссылкой на моё приложение?
-
От себя добавлю - для сравнения есть чудесная функция System.Math.CompareValue Ещё гляньте System.Math.Vectors.TEpsilon - там есть полезные константы
-
Собственно сабж - есть ли в MacOS аналог avifil32.dll b и её функций? А вообще - нужно записать видео с экрана