Вопросы с меткой [delphi-xe5]
Delphi XE5, выпущен 11 сентября 2013 года. При использовании этой метки, добавляйте метку Delphi.
38
вопросов
0
голосов
0
ответов
46
показов
Сгенерировать все возможные комбинации из заглавных и строчных букв
Как получить все возможные комбинации из заглавных и строчных букв в слове не меняя их порядок.
К примеру имеем слово на входе
abc12
А на выходе получим
abc12
abC12
aBc12
aBC12
Abc12
AbC12
ABc12
...
0
голосов
1
ответ
59
показов
Сохранение дубликатов строк
Как сохранить все дубликаты строк, именно сохранить а не удалить.
Вот так удаление идет дубликатов а вот интересно как их сохранить в отдельный файл ?
var
f1: TextFile;
st: string;
s: ...
2
голоса
0
ответов
64
показа
Генерация текста
Данный код генерирует текст по такому принципу:
Есть шаблон к примеру:
ru.stackoverflow.com - {лучший|классный|восхитительный} форум - {2019|2020|2022} года
После, генерация идет только по первым ...
0
голосов
1
ответ
53
показа
Как в Delphi объявить константу равную меньшей из двух других?
Для удобства работы, хочу задать некоторые ограничения константами. Например:
const
MAX_BUFFERS = 16;
MAX_SOURCES = 32;
MAX_SOUNDS = 16;
Часть из констант со-зависимы. Хочу их связать. ...
0
голосов
1
ответ
119
показов
Как масштабировать видео с веб камеры?
Есть код (исходник) на Delphi, который отлично захватывает видео с веб камеры.
Как реализовать ползунок, при передвижении которого бы видео масштабироваось?
interface
uses
Windows, Messages, ...
1
голос
1
ответ
107
показов
Удаление строк в TStringList
При удалении всех строк где есть слово "Del" сообщение об ошибке: List index out of bounds (2)
var
L, K: TStringList;
i: integer;
begin
L := TStringList.Create;
L.LoadFromFile(...
0
голосов
1
ответ
36
показов
Копирование части строки из memo в Edit
Есть:
Edit1.Text
Edit2.Text
Edit3.Text
Edit4.Text
В Memo1 первая строка:
User1/15/21.06.12/568
Я нажимаю кнопку и переносим значения с Memo.Lines[0]. То есть с первой строки Memo в Edit:
Edit1.Text ...
0
голосов
1
ответ
37
показов
Замена слова на слова с нумерацией
База такого типа:
Text 01.02 Text 03.01
Text 01.02 Text 03.01
Text 01.02 Text 03.01
Нужно заменить слово Text на: Text1, Text2, Text3 и так далее. И на выходе результат:
База такого типа:
Text1 01.02 ...
3
голоса
1
ответ
72
показа
Копирование Handle окна используя клавиатуру
Получаю Handle окна другой программы при наведении курсора мышки на форму (то есть форму другой программы). И вывожу его в LabelHandle.Caption.
Интересует ответ на вопрос: Как, при нажатии на ...
1
голос
1
ответ
128
показов
Как правильно разбить строку на слова
Как строки вот такого вида:
1. Космос 2. Nastasia 3. mamochka.dochka0702 4. kyklabratz 5. ProstoTanya 6. Olga135
Разбить таким образом что бы на выходе получились только имена и в столбик. То есть ...
1
голос
1
ответ
154
показа
Работа OpenDialog в цикле
Как обработать несколько файлов открыв их через OpenDialog. Добавила в код:
OpenDialog1.Options := OpenDialog1.Options + [ofAllowMultiSelect];
if OpenDialog1.Execute then
И после:
procedure ...
0
голосов
1
ответ
89
показов
Как определить, какой пункт контекстного меню был нажат в Delphi?
Здравствуйте. Пишу приложение в среде Delphi. Для его запуска использую два пункта контекстного меню, которые добавляю через реестр. Вопрос, как сделать так, чтобы приложение различало, какой из двух ...
2
голоса
2
ответа
173
показа
Как добавить нулевой байт в файл Delphi?
Столкнулся с проблемой в Delphi. Имеется файловая переменная F: File. Как в нее добавить нулевой байт? Это нужно осуществить с помощью процедуры BlockWrite.
1
голос
3
ответа
642
показа
Как в Delphi узнать количество занимаемой приложением оперативной памяти?
Во время работы приложения по обработке больших объемов данных, хочу стартовать отдельный фоновый поток и мониторить объем занимаемой приложением оперативной памяти. По аналогии с тем, как Task ...
0
голосов
1
ответ
160
показов
Delphi XE5 ресайз PNG с альфа каналом
Проблема с ресайзом, как изменить размер чтобы сохранился альфа канал в нормальном его виде. На картинке слева - исходный png(900x900) загруженный в TImage, справа - ресайз через BitMap с ...
0
голосов
2
ответа
794
показа
Как создать простой текстовой файл в Делфи?
Мне нужно создать простой текстовый файл в Делфи и записать в него буквально пару строк. Как это сделать максимально просто?
Например, создать 1.txt по пути D:\folder\ с содержимым 123456 и 777.
1
голос
1
ответ
137
показов
Как правильно привести поля запроса к нужному типу?
Использую TSQLQuery из библиотеки dbExpress
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Text := 'select cast(0.001 as float)';
SQLQuery1.Open;
SQLQuery1.First;
Memo1.Lines.Add(FloatToStr(SQLQuery1....
1
голос
1
ответ
273
показа
Как из главого потока определить состояние дополнительных потоков?
Имеется главная форма с кнопкой, которая запускает и останавливает дополнительный поток:
procedure TForm1.Button1Click(Sender: TObject);
begin
if Assigned(MyThread) then
begin
Button1....
0
голосов
2
ответа
2k
показов
Приведение типов TJSONObject и TJSONArray
На входе имеется строка с JSON-документом неопределенного типа. Возможны варианты: JSONObject, JSONArray или пустая строка не являющаяся JSON-документом. Как определить тип документа и привести его к ...
1
голос
1
ответ
2k
показов
Indy EIdHTTPProtocolException HTTP/1.1 400 Bad Request
Пытаюсь воспользоваться API ресурса. Для запроса с авторизацией руководствуюсь данной инструкцией https://bitfinex.readme.io/v1/docs/rest-auth В качестве эксперимента скомпилировал приведенный там ...
0
голосов
0
ответов
238
показов
Как из потока (Thread) корректно читать состояния визуальных компонентов главной формы?
Допустим из потока с циклом необходимо проверять состояние CheckBox который находится на главной форме. Будет ли корректна нижеследующая реализация, через булевую глобальную переменную, чтение и ...
2
голоса
1
ответ
259
показов
Как в Delphi узнать последнюю строчку своего кода, в котором возникло исключение?
В некоторых случаях при возникновении ошибок, во время отладки, компилятор показывает строчку дельфовых библиотек, где именно возникло исключение. Например обращение к несуществующему индексу массивов ...
1
голос
1
ответ
273
показа
Повторная отправка запроса из IdHttp при возникновении EIdReadTimeout
В отдельном потоке имеется функция возвращающая ответ от сервера, но временами ресурс работает очень нестабильно и ответы от него приходят через раз, вываливаясь в исключение по таймауту ...
2
голоса
1
ответ
187
показов
Прямое присваивание значений полям записи в конструкции TList<record>
Чтобы была понятна суть вопроса привожу упрощенный код:
type
TMyRecord = record
Field1, Field2, Field3: String
end;
TMyList = class(TList<TMyRecord>);
var
MyList: TMyList;
...
2
голоса
2
ответа
1k
показов
Как правильно уничтожать вложенные объекты JSON-документа в Delphi?
var
JSONObject: TJSONObject;
JSONArray: TJSONArray;
...
JSONObject:=TJSONObject.ParseJSONValue(S) as TJSONObject;
try
JSONArray := JSONObject.Get(0).JsonValue as TJSONArray;
try
Memo1....
5
голосов
5
ответов
499
показов
Как разрешить циклические зависимости в Делфи?
Допустим у нас есть 2 класса, расположенных в разных юнитах:
TMaster - хозяин собаки, который должен о ней знать
TDog - собака, которая должна знать о своем хозяине
Unit_Master:
uses Unit_Dog;
type ...
0
голосов
0
ответов
291
показ
Indy socket error
Динамически создаю IdHTTP, выполняю POST-запрос на свой php-скрипт. Source example:
http := TIdHTTP.Create(Nil);
try
sl.add('name=value');
try
html.Text := http.Post('http://page.ru', sl);
...
-2
голоса
1
ответ
2k
показов
Пример Android приложения на Delphi XE - БД изображений и способы ее передачи на ПК
Помогите с примерами на Delphi XE5-8.
Система будет состоять из 2-х частей: приложение на Андроид - дневник, где пользователь делает записи, приклепляет фото c камеры или галереи.
Приблизительно раз в ...
1
голос
1
ответ
47
показов
E2033 Types of actual and formal var parameters must be identical
При компиляции кода из Delphi 2010 в XE5 возникает ошибка.
if( not GetExitCodeProcess( ProcessInfo.hProcess, pExitCode^ ) )then begin
pExitCode^ := 0;
end;
В модуле ...
0
голосов
2
ответа
631
показ
Как соединить две процедуры или переделать одну процедуру в функцию?
Подскажите, как соединить две процедуры или переделать одну процедуру в функцию так, чтобы из первой процедуры (функции) передать значение во вторую.
Function TForm1.Button1Click(Sender: TObject);
...
0
голосов
2
ответа
2k
показов
Работа с кардридером
Добрый день!
Подскажите, плиз. Кто писал проекты на делфи по работе с кардридером, чтобы считывать и записывать чипованые пластиковые карточки?
Это нужно не для взлома и уж тем более не для кражи ...
0
голосов
1
ответ
323
показа
Как создать библиотеку иконок?
Всем привет! Не нашел подробного описания в интернете по созданию библиотеки иконок. Прошу помогите ссылкой или инструкцией.
0
голосов
1
ответ
859
показов
Предупреждение: [dcc32 Warning] W1030 Invalid compiler directive: 'true'
Всем привет! При компиляции выдало предупреждение: [dcc32 Warning] W1030 Invalid compiler directive: 'true'. Работе приложения это не мешает, однако считаю, что "врага надо знать в лицо". Прогуглил - ...
0
голосов
2
ответа
1k
показов
Создание и уничтожение форм. Освобождение переменных.
Добрый день, уважаемые программисты!
По нажатию кнопки создаю форму и отображаю:
newform:=Tnewform.Create(Self);
newform.ShowModal;
Потом закрываю новую форму и снова жму на кнопочку. И так ...
0
голосов
1
ответ
439
показов
Изменение размеров иконок в ListView
Загрузил в ListView иконки. Хочу при нажатии на кнопку изменить их размер. Размер изменяется, но иконки не отображаются, отображаются только подписи к ним. Решил проблему следующим образом: при ...
0
голосов
1
ответ
240
показов
Проблемы с плавным перемещением TSplitter.
Доброго времени суток, уважаемые программисты! Вероятно, моя проблема Вам покажется очень глупой, но всё же я её озвучу: поставил между двумя панелями TSplitter (одна панель выровнена по верху, вторая ...
0
голосов
1
ответ
443
показа
Функция ExtractIconEx
Добрый день, уважаемые программисты! Написал процедуру для извлечения иконок. Всё работает, но не смог до конца разобраться с функцией:
ExtractIconEx
Конкретно меня интересует, каким должен быть ...
1
голос
1
ответ
734
показа
Утечка памяти TStringList
Решил создать простую программку для проверки папки в режиме реального времени, ну, или почти. Создал форму, написал поток (Thread), в общем коде написал функцию реализующую почти весь необходимый мне ...