Вопросы с меткой [delphi-7]
Delphi 7, выпущен в августе 2002 года, является одной из самых популярных и широко используемых версий Delphi. Этот релиз Delphi считается самым стабильным, и все еще широко используется для объектно-ориентированного программирования для ОС Windows.
421
вопрос
1
голос
1
ответ
41
показ
Как при нажатии на кнопку переносить значение DevExpress treelist в memo?
Как при нажатии на кнопку переносить значение в memo?
procedure Tnov_zam.cxdbtrlstclmnlst21cxDBTreeListColumn1PropertiesButtonClick(
Sender: TObject; AButtonIndex: Integer);
begin
mmo2.Lines.Add(...
0
голосов
0
ответов
21
показ
не работает CaseSensitive=true в TStringList (Lazarus, Delphi7)
Столкнулся со странным поведением TStringList (в Lazarus и Delphi7): отсутствие реакции на установку CaseSensitive:=true
Uses SysUtils,Classes;
Var FList:TStringList;
BEGIN
if ...
0
голосов
0
ответов
24
показа
Ошибка Access violation at address
Помечает эту строку
s2 := p^;
procedure TForm1.Button4Click(Sender: TObject);
var
s,s1,i, s2, p2:Integer;
p:^Integer;
ret: Cardinal;
begin
memo1.Clear;
s:= StrToInt(Edit1.Text);
s1:= ...
0
голосов
1
ответ
42
показа
Просмотр содержимого любого блока памяти выбранного процесса
не могу понять что от меня требуют.
Программа, формирующая список всех процессов, выполняющихся на данном компьютере и позволяющая просматривать содержимое любого блока памяти выбранного процесса (...
1
голос
1
ответ
47
показов
Вывод дочерних процессов на Delphi7
Программа, которая выводит на экран список всех процессов и наименования дочерних процессов для каждого процесса. - Это ТЗ.
С выводом всех процессов разобрался, а как вывести наименования дочерних ...
0
голосов
0
ответов
17
показов
cxGrid OnButtonClick запись в memo
есть cxGrid, добавил колонку и навесил OnButtonClick, как сделать, чтобы при нажатии на кнопку возле определенной строки, данные их этой строки попадали в memo?
procedure Tnov_zam....
0
голосов
0
ответов
9
показов
Компонент WebBrowser, проблема отображения картинок
У меня в проекте есть компонент WebBrowser, есть условный сайт html. В настройках компонента указал путь к файлу html, в WindowsEngine стоит IEOnly (по какой-то причине не хочет запускать с Edge, хотя ...
-1
голос
1
ответ
21
показ
Загрузка значений в GetDriveType и GetVolumeInformatio из файла
Как можно загрузить значения 'c:/' диска в GetDriveType и GetVolumeInformatio из текстового файла, из первой строки текстового файла.
var
Form2: TForm2;
SerialNum,dtyp:Dword;
a,b:DWORD;
Buffer,...
-2
голоса
2
ответа
74
показа
Как вставить перед числом такое же число
Как вставить перед числом такое же число, т.е если ввели 1 то будет 11, есть код но он немного не так работает как надо
0
голосов
1
ответ
28
показов
Как добавить элемент scrollbar win32 API Delphi7
Как добавить элемент scrollbar win32 API Delphi7. Мне необходимо добавить три scrollbar min=0 max=255 у каждого. И чтоб при передвижении ползунка менялись значения в соответствующих edit
program ...
0
голосов
1
ответ
143
показа
Delphi мессенджер. Какие компоненты использовать?
Пишу мессенджер на Delphi7. Прошу помощи: как сделать пользовательский интерфейс примерно как в телеграме, ватсаппе и т.д.
Какие компоненты использовать чтобы при нажатии на i-ую вкладку слева ...
1
голос
1
ответ
52
показа
Эффект с надписью "Скопировано" в Delphi7
Как сделать так, чтобы при нажатии на tLabel (sLabel в моем случае, т.к. подключены AlphaSkins), текст копировался в буфер обмена (это я сделал) и пользователю показывалась надпись "Скопировано&...
0
голосов
1
ответ
68
показов
Копировать все с начала строки до последнего пробела
Вот так копировать все до первого пробела
s:=copy(s,1,pos(' ',s)-1);
Вот так копировать все до второго пробела
s:=copy(s,2,pos(' ',s)-1);
А вот как копировать все до последнего пробела с начала ...
0
голосов
0
ответов
41
показ
Как сделать событие в потоке?
Проблема в том что если я буду перемещать или изменять форму событие не будет срабатывать.
У меня есть событие procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer); компонента TComPort в ...
-2
голоса
1
ответ
35
показов
Не получается правильно записать эту формулу
Заданные действительные величины x,y,z,a,b,c,d. Разработать программу, которая упорядочивает величины a,b,c,d так, чтобы a<=b и c<=d, и вычисляет значение функции
if a>b then begin r:=a;a:=b;...
-1
голос
2
ответа
159
показов
Как соединить несколько строк в одну?
В текстовом файле расположены строки в таком виде:
>>>
Stroka1
Stroka2
Stroka3
>>>
>>>
Stroka4
Stroka5
Stroka6
Stroka7
>>>
Как соединить строки что между символами ...
0
голосов
1
ответ
104
показа
Удаление переносов строк в Memo
Загружаю в Memo1 список строк из текстового файла.
Memo1.Lines.LoadFromFile(ExtractFilePath(Application.ExeName)+ 'stroki.txt');
Длина каждой строки до 2000 символом. Почему memo режет каждую строку ...
1
голос
1
ответ
361
показ
Delphi, формула, ошибка [Error] Unit1.pas(90): Undeclared identifier: 'Power'
procedure TForm1.BitBtn1Click(Sender: TObject);
var a,b,c,d,rez:real;
begin
if Application.MessageBox('Вы подтверждаете расчет функции?',
'Подтвердите операцию', MB_YesNo+MB_IconQuestion+...
-1
голос
1
ответ
48
показов
Алгоритм присвоения победы в Delphi
Я создаю игру крестики-нолики. Мне надо ввести проверку на победную комбинацию. При компиляции кода, победной комбинацией является только последний if, а первый пропускается, а это я только считываю ...
0
голосов
2
ответа
55
показов
Работа БД Access и DLL
Есть самописная программа, которая перестает нормально функционировать после установки на компьютер windows 10.
Это DLL, которая была написана в 2010 году что-то делает, и возвращает значения, в этом ...
0
голосов
1
ответ
47
показов
Универсальность цикла, увеличение дальшейней поддержки
Имеется следующий цикл, который распределяет полученную информацию из запроса, который соответствует i.
общий цикл for i := 1 to maxI do, где maxI задан перед началом цикла и равняется 13-и
при ...
0
голосов
2
ответа
67
показов
Как исправить перевод чисел в буквы (столбцы Excel)?
Мне необходимо иметь возможность проставления букв(английские) в зависимости от позиций в цикле
т.е если 1 итерация цикла, то проставляет буква А, если 26, то буква Z. Если 27 итерация, то АА, если 28,...
0
голосов
0
ответов
36
показов
Как передать файл с USB-устройства на компьютер (Delphi)?
Необходимо чтобы по нажатию кнопки файл с телефона, подключенного к компьютеру через Usb, копировался на жёсткий диск. Как можно это реализовать в Delphi?
-1
голос
2
ответа
40
показов
Ошибка в statusbar
Прога должна связываться с бд и выводить инфу оттуда. В строке TStatusBar.Panels[1].Text := IntToStr(dstBrigades.RecordCount); пишет ошибку при запуске [DCC Error] main030.pas(49): E2233 Property '...
0
голосов
1
ответ
55
показов
Скопировать текст из сайта в Memo
Текстовый файл Text.txt расположен на сайте и в нем текст:
Год:2020
Число:19
Месяц:09
Делаю запрос вот так:
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Add(IdHTTP1.Get('http://...
0
голосов
1
ответ
112
показов
Как масштабировать видео с веб камеры?
Есть код (исходник) на Delphi, который отлично захватывает видео с веб камеры.
Как реализовать ползунок, при передвижении которого бы видео масштабироваось?
interface
uses
Windows, Messages, ...
1
голос
0
ответов
73
показа
Пробую расшифровать на Delphi 7 (AES(DCPrijndael) key SHA256 мод=CBC) компонент DCPcrypt
Пробую расшифровать фразу на Delphi 7, (ключи и исходный текст верные, на PHP расшифровываются). Почему то при перезагрузке программы(рестарте) даже разный результат получается. Можете подсказать что ...
2
голоса
1
ответ
84
показа
Анимация сворачивания окна в Windows 7 и Delphi 7
Как известно, в Windows 7 при включённых эффектах окно сворачивается не мгновенно, а с анимацией длительностью в несколько сотых секунд.
У меня есть программа, написанная в Delphi 7, которая при ...
3
голоса
0
ответов
60
показов
Существуют ли версии CEF4 Chromium для Delphi 7 совместимые с Windows XP?
Интегрирую CEF3 (chromium) в Delphi в общем то успешно и статьи по этому поводу есть. Тем не менее хотелось бы понимать может быть есть версии CEF4 которые были бы совместимы с Windows XP (вроде как ...
1
голос
0
ответов
48
показов
Как вызвать приложение у пользователя на рабочем столе от службы в Delphi?
Пишу службу на Delphi 7.
Мне нужно чтобы у пользователя по определённому событию появлялось окно программы (отдельной - то есть не службы) то есть другого форм-приложения так же написанного на Delphi.
...
1
голос
1
ответ
97
показов
Удаление строк в TStringList
При удалении всех строк где есть слово "Del" сообщение об ошибке: List index out of bounds (2)
var
L, K: TStringList;
i: integer;
begin
L := TStringList.Create;
L.LoadFromFile(...
0
голосов
1
ответ
35
показов
Копирование части строки из 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
ответ
319
показов
Смена текста Edit при нажатии на кнопку
На форме расположена кнопка Button1Click и Edit1.Text а также и текстовый файл 1.txt в котором есть строки:
Например:
1234567
98765432
3232323
434343434
Нужно что бы при нажатия на кнопку в Edit ...
0
голосов
1
ответ
27
показов
Как дублировать строку в Memo
В Edit1 есть текст:
Сегодня 19.07.2020
Нужно что бы при нажатии на кнопку эта строка дублировалась 5 раз в memo1. На выходе получим результат в memo1:
Сегодня 19.07.2020
Сегодня 19.07.2020
Сегодня ...
0
голосов
1
ответ
35
показов
Замена слова на слова с нумерацией
База такого типа:
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 ...
-1
голос
1
ответ
332
показа
Как выйти из цикла for по нажатию на кнопку?
Как выйти из цикла при нажатии на другую кнопку (Остановить выполнение Button1Click) при нажатии на кнопку Button2Click:
Кнопка с циклом:
procedure TForm1.Button1Click(Sender: TObject);
var
A: ...
0
голосов
1
ответ
88
показов
Удаление заблокированной папки или файла
Пытаюсь удалить папку и при удалении выскакивает окошко и в нем текст:
Операция не может быть завершена, так как эта папка или файл открыты в другой программе.
Закройте папку или файл и повторите ...
-1
голос
1
ответ
60
показов
Синхронизация (изменение значений) Edit используя Dll
Как передать (изменить) данные в Edit (любой текст или сумму или отнять) используя .dll. Получаю ошибку при компиляции set.dll в виде:
[dcc32 Error] Project1.dpr(8): E2003 Undeclared identifier: '...
1
голос
0
ответов
79
показов
Старая Delphi 7. Работа с рестром windows. Как узнать удалось ли получить доступ к ключу HKEY_LOCAL_MACHINE?
Нашёл в интернете по ссылке http://blog.ivru.net/?id=203 довольно не плохой пример по работе с реестром windows из старой версии Delphi.
Там же на писано, что для начала работы с реестром windows ...
1
голос
0
ответов
84
показа
Старая Delphi 7 можно ли дозпросить права администратора не прекращая работу приложения и не перезапуская его
Знаю, что есть способ в старой Delphi 7 проверить наличие прав администратора и используя WinAPI перезапустить приложение с запросом прав администратора а текущее приложение закрыть.
Возник другой ...
0
голосов
1
ответ
39
показов
Замена после символа
В текстовом файле есть строки:
112.12.34.555.123+1245.И тут текст
11.111.54.888+54544.И тут текст
333.231+554333.И тут текст
Как заменить первую точку (.) после знака плюс (+) на точку с запятой (;). ...
0
голосов
1
ответ
56
показов
Как можно ускорить алгоритм?
Не устраивает только одно - скорость работы алгоритма, как можно ускорить алгоритм в этом коде (Может из за того что использую AssignFile ?).:
Может использовать TStreamReader (но с ним работать не ...
5
голосов
2
ответа
135
показов
Есть ли в старой Delphi 7 функция аналогичная php explode для работы с строками и разбиения их в массив по разделителю?
Взялся поправить один проект на Delphi 7 и там данные приходится много дробить которые по сети приходят чтобы их в нужные места вставить.
Я конечно уже всё сделал на copy pos и тому подобному, только ...
1
голос
0
ответов
60
показов
Порядок включения ресурсов в исполняемый файл в Delphi 7
Всем доброго времени суток.
Не могу понять, в каком порядке компилятор Delphi 7 упаковывает ресурсы в исполняемый файл?
Использую классическую схему - из текстовых RC-файлов автоматически собираются и ...
0
голосов
2
ответа
115
показов
Delphi 6/7 - какую книгу прочитать про потоки и их допустимое колличество
Требуется быстро поднять знания по достаточно не новой среде Delphi 6 или 7, в общем то я с ней работал, но вот нужно глубже понимать работу с потоками.
Не совсем понятно в каких случаях нужно ...
3
голоса
1
ответ
69
показов
Копирование Handle окна используя клавиатуру
Получаю Handle окна другой программы при наведении курсора мышки на форму (то есть форму другой программы). И вывожу его в LabelHandle.Caption.
Интересует ответ на вопрос: Как, при нажатии на ...
2
голоса
1
ответ
175
показов
Win Socket API Delphi 6 отправка сообщений по UDP между клиентом и сервером. Почему порт клиента отличается в серверной и клиентской программе?
Чтобы более понятна была ситуация выкладываю следующий скринсшот:
Разбираясь в UDP и программированию протокола с использованием Win Socket API в Delphi 6 столкнулся с ситуацией, что почему то в ...
0
голосов
1
ответ
42
показа
Cоздание копии файла
Как сделать запись в файл создав копию файла 1.exe (как на примере) ?
В коде что предоставлен ниже: Идет Запись текста из Memo1 в файл 1.exe, перезаписывая его. А нужно чтобы создавалась копия файла ...
0
голосов
1
ответ
44
показа
Как определить, нужны ли права администратора для изменения файла или нет?
У меня есть программа на Delphi, работающая с файлами. Использую я функцию AssignFile(). Проблема в том, что файлы на системном разделе требуют права администратора для их изменения. Из-за этого ...
-1
голос
1
ответ
65
показов
Как изменить видимость объекта в Delphi 7 через скрипт? [закрыт]
Помогите, пожалуйста, написать скрипт, который при нажатии кнопки будет ставить значение параметра Visible на False у объекта, который будет указан в коде.