Вопросы с меткой [delphi-7]

Delphi 7, выпущен в августе 2002 года, является одной из самых популярных и широко используемых версий Delphi. Этот релиз Delphi считается самым стабильным, и все еще широко используется для объектно-ориентированного программирования для ОС Windows.

Фильтрация
Сортировка
Метки
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 ...
  • 1
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:= ...
  • 45
0 голосов
1 ответ
42 показа

Просмотр содержимого любого блока памяти выбранного процесса

не могу понять что от меня требуют. Программа, формирующая список всех процессов, выполняющихся на данном компьютере и позволяющая просматривать содержимое любого блока памяти выбранного процесса (...
  • 45
1 голос
1 ответ
47 показов

Вывод дочерних процессов на Delphi7

Программа, которая выводит на экран список всех процессов и наименования дочерних процессов для каждого процесса. - Это ТЗ. С выводом всех процессов разобрался, а как вывести наименования дочерних ...
  • 45
0 голосов
0 ответов
17 показов

cxGrid OnButtonClick запись в memo

есть cxGrid, добавил колонку и навесил OnButtonClick, как сделать, чтобы при нажатии на кнопку возле определенной строки, данные их этой строки попадали в memo? procedure Tnov_zam....
0 голосов
0 ответов
9 показов

Компонент WebBrowser, проблема отображения картинок

У меня в проекте есть компонент WebBrowser, есть условный сайт html. В настройках компонента указал путь к файлу html, в WindowsEngine стоит IEOnly (по какой-то причине не хочет запускать с Edge, хотя ...
  • 48
-1 голос
1 ответ
21 показ

Загрузка значений в GetDriveType и GetVolumeInformatio из файла

Как можно загрузить значения 'c:/' диска в GetDriveType и GetVolumeInformatio из текстового файла, из первой строки текстового файла. var Form2: TForm2; SerialNum,dtyp:Dword; a,b:DWORD; Buffer,...
-2 голоса
2 ответа
74 показа

Как вставить перед числом такое же число

Как вставить перед числом такое же число, т.е если ввели 1 то будет 11, есть код но он немного не так работает как надо
  • 1
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;...
  • 21
-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 году что-то делает, и возвращает значения, в этом ...
  • 13
0 голосов
1 ответ
47 показов

Универсальность цикла, увеличение дальшейней поддержки

Имеется следующий цикл, который распределяет полученную информацию из запроса, который соответствует i. общий цикл for i := 1 to maxI do, где maxI задан перед началом цикла и равняется 13-и при ...
  • 13
0 голосов
2 ответа
67 показов

Как исправить перевод чисел в буквы (столбцы Excel)?

Мне необходимо иметь возможность проставления букв(английские) в зависимости от позиций в цикле т.е если 1 итерация цикла, то проставляет буква А, если 26, то буква Z. Если 27 итерация, то АА, если 28,...
  • 13
0 голосов
0 ответов
36 показов

Как передать файл с USB-устройства на компьютер (Delphi)?

Необходимо чтобы по нажатию кнопки файл с телефона, подключенного к компьютеру через Usb, копировался на жёсткий диск. Как можно это реализовать в Delphi?
  • 53
-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, которая при ...
  • 307
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(...
  • 35
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 ...
  • 35
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 Сегодня ...
  • 35
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 ...
  • 35
-1 голос
1 ответ
332 показа

Как выйти из цикла for по нажатию на кнопку?

Как выйти из цикла при нажатии на другую кнопку (Остановить выполнение Button1Click) при нажатии на кнопку Button2Click: Кнопка с циклом: procedure TForm1.Button1Click(Sender: TObject); var A: ...
  • 35
0 голосов
1 ответ
88 показов

Удаление заблокированной папки или файла

Пытаюсь удалить папку и при удалении выскакивает окошко и в нем текст: Операция не может быть завершена, так как эта папка или файл открыты в другой программе. Закройте папку или файл и повторите ...
  • 35
-1 голос
1 ответ
60 показов

Синхронизация (изменение значений) Edit используя Dll

Как передать (изменить) данные в Edit (любой текст или сумму или отнять) используя .dll. Получаю ошибку при компиляции set.dll в виде: [dcc32 Error] Project1.dpr(8): E2003 Undeclared identifier: '...
  • 35
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.И тут текст Как заменить первую точку (.) после знака плюс (+) на точку с запятой (;). ...
  • 35
0 голосов
1 ответ
56 показов

Как можно ускорить алгоритм?

Не устраивает только одно - скорость работы алгоритма, как можно ускорить алгоритм в этом коде (Может из за того что использую AssignFile ?).: Может использовать TStreamReader (но с ним работать не ...
5 голосов
2 ответа
135 показов

Есть ли в старой Delphi 7 функция аналогичная php explode для работы с строками и разбиения их в массив по разделителю?

Взялся поправить один проект на Delphi 7 и там данные приходится много дробить которые по сети приходят чтобы их в нужные места вставить. Я конечно уже всё сделал на copy pos и тому подобному, только ...
1 голос
0 ответов
60 показов

Порядок включения ресурсов в исполняемый файл в Delphi 7

Всем доброго времени суток. Не могу понять, в каком порядке компилятор Delphi 7 упаковывает ресурсы в исполняемый файл? Использую классическую схему - из текстовых RC-файлов автоматически собираются и ...
  • 307
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 у объекта, который будет указан в коде.

1
2 3 4 5
9