Вопросы с меткой [delphi-xe]
Delphi XE, выпущен 30 августа 2010 года. При использовании этой метки, добавляйте метку Delphi.
126
вопросов
0
голосов
0
ответов
43
показа
Как установить Delphi XE в 2024 году?
Как установить Delphi XE в 2024 году в России? Как обойти выключение серверов?
Ошибка при установке: "Tray to resume the broken downloads".
Кто как справился с проблемой?
(нужен только из-за ...
1
голос
1
ответ
61
показ
Delphi 10.4 не понимает class TClientSocket
Давно не программировал. Решил вспомнить, чтоб не отупеть. Установил Delphi 10.4, до этого была установлена Delphi XE Architect (в ней, раньше, на Win7 всё работало). Но при миграции она перестала ...
1
голос
0
ответов
61
показ
Delphi TGPImage как сделать изображение черно-белым
Использую библиотеки для наложения текста на изображение Winapi.GDIPAPI, Winapi.GDIPOBJ, Winapi.GDIPUTIL. Открываю изображение, добавляю текст и сохраняю:
imgGPI := TGPImage.Create(fileName);
...
0
голосов
1
ответ
133
показа
Проверка и сохранение строк
Я проверяю дубликаты строк до символа =. И если строки есть то сохранить не удаляя дубликаты.
var f, s: TStringDynArray;
i, j, k: integer;
L, L1: TStringList;
index: array of integer;
...
0
голосов
0
ответов
94
показа
Как декодировать Base64 в Zlib в строку?
Есть строка закодированная в base64, соответственно при декодировании мы получаем массив байтов, который сжат в Zlib-e (это ответ webSocket'a), нужно вытащить строку в читаемом формате, ...
0
голосов
2
ответа
294
показа
Delphi xe 10.4 webSocket пишет Connection closed by gracefully
Использую для теста компонент: https://github.com/arvanus/Indy/blob/WebSocketImpl/Lib/Core/IdWebSocketSimpleClient.pas
При подключении пишет ошибку Connection closed by Gracefully. Хотя в целом ...
-1
голос
1
ответ
64
показа
Загрузка значений в GetDriveType и GetVolumeInformatio из файла
Как можно загрузить значения 'c:/' диска в GetDriveType и GetVolumeInformatio из текстового файла, из первой строки текстового файла.
var
Form2: TForm2;
SerialNum,dtyp:Dword;
a,b:DWORD;
Buffer,...
0
голосов
1
ответ
214
показов
декодирование архива zip Base64
Я получаю XML в нем есть атрибут закодированный в Base64 - архив zip. Подскажите как декодировать и сохранить zip архив локально?
0
голосов
1
ответ
95
показов
Webbrowser не способен отобразить reCAPTCHA
Можно как то заставить компонент Webbrowser1 отобразить reCAPTCHA ? В моем случае страница просто загружается а reCAPTCHA нет.
WebBrowser1.Navigate('Ссылка на сайт');
WebBrowser1.Silent := True;
0
голосов
1
ответ
116
показов
Текст в одну строчку
Есть строки такого типа:
*Number:Date // То есть тут начало, где есть символ *
Number:Date
Number:Date
Number:Date
Number:Date
Number:Date
*Number:Date // То есть тут начало, где есть символ *
Number:...
1
голос
1
ответ
84
показа
Удаление и сравнения одинаковых папок
Интересует решения такого вопроса: Есть список папок с подобными именами
dsrecr7e7 787
dsrecr7e7 587
ctqcfw7w4 6578
Как удалить дубликаты папок и все что в них сравнивая их до первого пробела. То ...
-2
голоса
1
ответ
76
показов
Объединение строк в Memo
В Memo1 есть текст
aaa: 111 одинаковые слова до двоеточие
aaa: 222 одинаковые слова до двоеточие
aaa: 333 одинаковые слова до двоеточие
bbb: 444
ccc: 555 одинаковые слова до двоеточие
ccc: 777 ...
0
голосов
1
ответ
60
показов
Быстро обрезать ссылки до доменов Memo
Как в Memo1 обрезать ссылки до доменов удалив все https и http.
https://site1.ru/threads/fdfddd2/
http://site2.ru/threads/fdfddd23434/
https://site3.ru/threads/fdfddd434/
Что бы на выходе получилось
...
1
голос
2
ответа
191
показ
Ввод значений в Edit
Как сделать вывод спец символов в Edit? что бы можно было указывать в Edit1.Text символы которые удалить ?
if s[i] in ['!', '+'] then
Delete(s, i, 1)
Если делаю вот так
if s[i] in CharinSet(edit1....
0
голосов
1
ответ
90
показов
Сохранение дубликатов строк
Как сохранить все дубликаты строк, именно сохранить а не удалить.
Вот так удаление идет дубликатов а вот интересно как их сохранить в отдельный файл ?
var
f1: TextFile;
st: string;
s: ...
1
голос
1
ответ
130
показов
Удалить цифры с конца строки до первой буквы
Есть строки:
dsds444dhhdhshhdhs1233
dd33ssddsdsdhs332
dsd777hhjjhs1233
Нужно удалить цифры с конца строки до первой буквы. И результат:
dsds444dhhdhshhdhs
dd33ssddsdsdhs
dsd777hhjjhs
Делаю вот так ...
0
голосов
1
ответ
88
показов
Перевод буквы в нижний регистр
Есть строки вот такого плана:
Price=123:Acf3456
Ac_number=123(A):Gpm456
Price=5678:Bms3456
Ac_number=5678(B):Kprt456
Как перевести первую букву после двоеточия в нижний регистр. На выходе результат:
...
-1
голос
2
ответа
252
показа
Как соединить несколько строк в одну?
В текстовом файле расположены строки в таком виде:
>>>
Stroka1
Stroka2
Stroka3
>>>
>>>
Stroka4
Stroka5
Stroka6
Stroka7
>>>
Как соединить строки что между символами ...
0
голосов
1
ответ
219
показов
Удаление переносов строк в Memo
Загружаю в Memo1 список строк из текстового файла.
Memo1.Lines.LoadFromFile(ExtractFilePath(Application.ExeName)+ 'stroki.txt');
Длина каждой строки до 2000 символом. Почему memo режет каждую строку ...
0
голосов
2
ответа
140
показов
Удаление только слов
Собственно вопрос в чем: В текстовом файле имеются строки вот такого вида:
Delphi1Prolanguage
Delphi2Prolang
Delphi3Proln
Delphi1
Delphi2
Delphi3
Как из этого списка удалить только слова только целые ...
0
голосов
1
ответ
95
показов
Странности с проектом Delphi - не изменяется позиционирование главной формы
Началось всё с невозможности изменить иконку в проекте.
Теперь заметил, что я постоянно пододвигаю окно главной формы в центр, но при каждом новом открытии проекта она опять забивается в угол. Т.е. ...
0
голосов
1
ответ
598
показов
Не устанавливается иконка для приложения Delphi
Программирую в Delphi не первый год, а уже наверное полтора десятилетия.
Но вот вопрос - не устанавливается иконка. Т.е. взял старый проект, переделал его немного, а позже заметил, что слетела иконка ...
2
голоса
0
ответов
77
показов
Генерация текста
Данный код генерирует текст по такому принципу:
Есть шаблон к примеру:
ru.stackoverflow.com - {лучший|классный|восхитительный} форум - {2019|2020|2022} года
После, генерация идет только по первым ...
0
голосов
1
ответ
83
показа
Скопировать текст из сайта в Memo
Текстовый файл Text.txt расположен на сайте и в нем текст:
Год:2020
Число:19
Месяц:09
Делаю запрос вот так:
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Add(IdHTTP1.Get('http://...
0
голосов
1
ответ
43
показа
FastReport 4 - проблема с "property FillType does not exist"
Установил по интернет инструкциям FastReport v4 (восстановление после падения Windows). FastReport заработал, если создавать новый проект.
Но случилось страшное - все проекты созданные до, перестали ...
0
голосов
0
ответов
48
показов
Настройка FastReport на Delphi XE - Fatal Error - Fatal Error: F2051 Unit RvDLDBX was compiled with a different version of SqlExpr.TSQLConnection
Устанавливал FastReport по многочисленным, раздробленным инструкциям по установки из интернета. Всё пошагово скомпилировал, установил все его компоненты (обычного инсталятора не нашёл). Проверял ...
0
голосов
1
ответ
60
показов
ProgressBar и Memo
В Memo расположено три строки:
11
22
33
По нажатию на кнопку удаляю первую строку Memo:
Memo1.Lines.delete(0);
Как сделать что бы ProgressBar заполнялся по мере удаления строк из Memo (То есть ...
2
голоса
1
ответ
203
показа
Ошибка подключения в Indy
Код ошибки вот такой:
Error connecting with SSL.
error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure.
Какой бы тип sslvSSLv2, sslvSSLv23, sslvSSLv3, sslvTLSv1 не ...
0
голосов
1
ответ
203
показа
Как подключить прокси при отправке сообщения на почту
Как подключить прокси при отправке сообщения на почту?.
Вот код отправки сообщения:
procedure TMainForm.ButtonSendClick(Sender: TObject);
var
SMTP : TIdSMTP;
msg : TIdMessage;
SSLOpen : ...
1
голос
1
ответ
239
показов
Удаление строк в TStringList
При удалении всех строк где есть слово "Del" сообщение об ошибке: List index out of bounds (2)
var
L, K: TStringList;
i: integer;
begin
L := TStringList.Create;
L.LoadFromFile(...
0
голосов
1
ответ
56
показов
Копирование части строки из memo в Edit
Есть:
Edit1.Text
Edit2.Text
Edit3.Text
Edit4.Text
В Memo1 первая строка:
User1/15/21.06.12/568
Я нажимаю кнопку и переносим значения с Memo.Lines[0]. То есть с первой строки Memo в Edit:
Edit1.Text ...
1
голос
1
ответ
628
показов
Смена текста Edit при нажатии на кнопку
На форме расположена кнопка Button1Click и Edit1.Text а также и текстовый файл 1.txt в котором есть строки:
Например:
1234567
98765432
3232323
434343434
Нужно что бы при нажатия на кнопку в Edit ...
0
голосов
1
ответ
39
показов
Как дублировать строку в Memo
В Edit1 есть текст:
Сегодня 19.07.2020
Нужно что бы при нажатии на кнопку эта строка дублировалась 5 раз в memo1. На выходе получим результат в memo1:
Сегодня 19.07.2020
Сегодня 19.07.2020
Сегодня ...
0
голосов
1
ответ
66
показов
Замена слова на слова с нумерацией
База такого типа:
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 ...
0
голосов
1
ответ
163
показа
Удаление заблокированной папки или файла
Пытаюсь удалить папку и при удалении выскакивает окошко и в нем текст:
Операция не может быть завершена, так как эта папка или файл открыты в другой программе.
Закройте папку или файл и повторите ...
-1
голос
1
ответ
70
показов
Синхронизация (изменение значений) Edit используя Dll
Как передать (изменить) данные в Edit (любой текст или сумму или отнять) используя .dll. Получаю ошибку при компиляции set.dll в виде:
[dcc32 Error] Project1.dpr(8): E2003 Undeclared identifier: '...
0
голосов
1
ответ
133
показа
Замена после символа
В текстовом файле есть строки:
112.12.34.555.123+1245.И тут текст
11.111.54.888+54544.И тут текст
333.231+554333.И тут текст
Как заменить первую точку (.) после знака плюс (+) на точку с запятой (;). ...
0
голосов
1
ответ
83
показа
Как можно ускорить алгоритм?
Не устраивает только одно - скорость работы алгоритма, как можно ускорить алгоритм в этом коде (Может из за того что использую AssignFile ?).:
Может использовать TStreamReader (но с ним работать не ...
3
голоса
1
ответ
89
показов
Копирование Handle окна используя клавиатуру
Получаю Handle окна другой программы при наведении курсора мышки на форму (то есть форму другой программы). И вывожу его в LabelHandle.Caption.
Интересует ответ на вопрос: Как, при нажатии на ...
0
голосов
1
ответ
55
показов
Cоздание копии файла
Как сделать запись в файл создав копию файла 1.exe (как на примере) ?
В коде что предоставлен ниже: Идет Запись текста из Memo1 в файл 1.exe, перезаписывая его. А нужно чтобы создавалась копия файла ...
0
голосов
1
ответ
109
показов
TOracleDataSet.Filter по двум полям
После выполнения запроса в полученном наборе данных необходимо применить фильтрацию по двум полям.
with OracleDataSet do
begin
filtred := false;
filter := 'buh = 1 and fin = 1';
...
0
голосов
1
ответ
54
показа
Как определить, нужны ли права администратора для изменения файла или нет?
У меня есть программа на Delphi, работающая с файлами. Использую я функцию AssignFile(). Проблема в том, что файлы на системном разделе требуют права администратора для их изменения. Из-за этого ...
1
голос
1
ответ
225
показов
Как правильно разбить строку на слова
Как строки вот такого вида:
1. Космос 2. Nastasia 3. mamochka.dochka0702 4. kyklabratz 5. ProstoTanya 6. Olga135
Разбить таким образом что бы на выходе получились только имена и в столбик. То есть ...
1
голос
1
ответ
292
показа
Работа OpenDialog в цикле
Как обработать несколько файлов открыв их через OpenDialog. Добавила в код:
OpenDialog1.Options := OpenDialog1.Options + [ofAllowMultiSelect];
if OpenDialog1.Execute then
И после:
procedure ...
0
голосов
1
ответ
61
показ
Поиск числовых значений
Функция ищет все числовые значения в строках. Как сделать что бы функция искала только числовые значения длина которых равна = 5.
То есть строка состоит из:
12345 FC-text212 12345FC-text212
На ...
0
голосов
1
ответ
341
показ
Добавить данные в файл формата .exe и получить их обратно
Имеется список exe файлов, небольшого размера.
Пример, список:
1.exe
2.exe
3.exe
Нужно в конце каждого из низ в добавить данные, в виде Hex строки. В Memo1 расположен текст.
2010
2011
2012
Нужно ...
1
голос
0
ответов
80
показов
Корректный поиск китайских и польских писем imap
var
MSG_COUNT: Integer;
SearchInfo: array of TIdIMAP4SearchRec;
begin
createImap;
SetLength(SearchInfo, 1);
Imap.SelectMailBox('INBOX');
SearchInfo[0].SearchKey := skFrom;
SearchInfo[0].Text ...
3
голоса
1
ответ
315
показов
Передача параметра контекстного меню проводника
У меня есть приложение, которое добавляет в контекстное меню проводника Windows созданный мною пункт. Вопрос: можно ли каким-либо способом определить имя файла, в котором я открыл данный пункт меню, и,...
6
голосов
3
ответа
217
показов
Можно ли использовать это поле в IDE Delphi для своих целей?
В инспекторе объектов имеется поле, похожее на многострочное, которое тупо копирует название свойств при навигации, т.е. оно абсолютно бесполезно. Что ещё хуже, его даже нельзя скрыть!
Хотелось бы в ...
0
голосов
1
ответ
63
показа
CheckColumn in StringGrid
Как программно заполнить(выставить чеки) поле CheckColumn из Базы данных? Использую SQLite и поле Status INTEGER. В примере от Embarcadero делается с Visual Bind. Никаких SetCheck или isCheck не нашел ...