Delphi для начинающих

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Delphi Передача пути из команды в реестре Привет всем, хочу спросить у вас. Вот например в реестре есть ключ: Key "C:\Windows\Key.exe" /show /aga как вытащить путь из ключа я знаю, но он не всегда помогает. Я пишу программу, она отображает ключи и инфу о них. p:=Pos('"',str); Delete(str,p,1); p:=Pos('"',str); Delete(str,p,100); p:=Pos(' /',str); Delete(str,p,100); p:=Pos(' -',str); Delete(str,p,100); https://www.cyberforum.ru/ delphi-beginners/ thread1361446.html	Получить RGB по коду цвета Delphi Здравствуйте. Имеются файлы. Несжатый восьмибитный битмап. Заголовка нет, сразу данные идут, поэтому написал приложение, в котором можно изменять ширину изображения, автоматически изменяя и высоту, при этом визуально определять, когда ширина будет нужная. Изображение пока вывожу ч\б. Проблема в том, что я не могу перевести код цвета в формат TColor. Палитры так же у меня нет, но есть вероятность....
Delphi Текст телеграммы (Delphi VCL) https://www.cyberforum.ru/ delphi-beginners/ thread1361363.html Ребят, есть задача: Введите текст телеграммы и стоимость одного слова. Определить стоимость телеграммы. При вводе текста запятые обозначаются словом ЗПТ, точки - словом Т. Вот код намудровал, но что-то не хочет ничего, помогите в чем проблема? var Form1: TForm1; implementation {$R *.dfm}	Delphi TNotifyEvent при создании объекта из кода https://www.cyberforum.ru/ delphi-beginners/ thread1361341.html Доброго времени суток. Для определенной задачи мне понадобилось создавать массив объектов и к каждому из них привязывать таймер, в обработчике события OnTimer которого я должен быть привязан к определенному объекту моего массива. const maxball=7; TBall = record Sh: TShape; Vx: real; Vy: real; m: real; mx: real;
Код ассемблера + Delphi Delphi Здравствуйте, люди добрые! Помогите пожалуйста кое-как изменить код. Суть такова - надо заменить "ABCDEFGO" на "ABCDEFGHIJKLMNOP", т.е. вместо трёх букв теперь в файле должны идти парами, например: ААА теперь АА, BAA теперь BA и т.п. Благодарю. Вот сам код: const wct: array of AnsiChar='ABCDEFGO'; var data: array of byte; size: Cardinal; input,output: file; begin	Delphi Хождение фишки по полю https://www.cyberforum.ru/ delphi-beginners/ thread1361319.html Доброго времени суток, моя первая тема по этому не бейте. Пытаюсь создать аналог монополии, столкнулся с тем, что фишка ходит неправильно, писал очень каменным путем. По этому помогите разобраться где я допустил ошибку и как оптимизировать этот код ( а его сто пудов можно написать в 1 строчку )) procedure TForm1.BitBtn1Click(Sender: TObject);
Delphi Приложение сворачивается в панель и не разворачивается Скомпилировал Project.exe, проверил на своём ПК - всё работает. Переношу Project.exe на др. ПК, Project.exe запускается в свёрнутом виде и не разворачивается. Не могу понять в чём дело, всю голову сломал. Подскажите где грабли!? https://www.cyberforum.ru/ delphi-beginners/ thread1361280.html	Delphi Экспоненциальное распределение (перевести из C# в Delphi) Проблема с переводом в программирование не очень!!! есть такой код на с using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq;
Delphi TMemoryStatus: показать в Label4 количество оперативки на компе procedure TForm1.Button1Click(Sender: TObject); var var MS : TMemoryStatus; begin GlobalMemoryStatus(MS); Label4.Caption:=(MS); Надо что-бы Label4 показывало количество опертавки на компе https://www.cyberforum.ru/ delphi-beginners/ thread1361268.html	Delphi Компилирование приложения под x64 Всем Доброго Времени суток! При компиляции проекта для 64 битных систем получаю ошибку: Project1.dpr(24): F2048 Bad unit format: 'forms.dcu' - Expected version: 28.0, Windows Unicode(x64) Found version: 28.0, Windows Unicode(x86) Чем она вызвана? https://www.cyberforum.ru/ delphi-beginners/ thread1361260.html
Очень странная ошибка однако (WB) Delphi Работаю над своим браузером. решил сделать что-то наподобие перехвата вкладок. При компиляции в окне Unit открывается project1 и выдает ошибку(курсор на begin). вот исходник где ошибка program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2}, Unit3 In 'Unit3.pas' {Form3} {$R *.res}	Delphi Распознание слов из строки Пытаюсь написать простейший интерпретатор, что бы при обнаружении в строке слова "message" выводил сообщение, а при обнаружении слова "close", собственно, закрывал. Есть идеи как реализовать это так, что бы выполнялось по порядку? В смысле, в строгой последовательности. Какие строковые операции нужно верстать? https://www.cyberforum.ru/ delphi-beginners/ thread1361134.html

vlados2441

3 / 3 / 4

Регистрация: 11.01.2015

Сообщений: 126

OnNewWindow2 перехват ссылки в WB - Delphi - Ответ 7146998

25.01.2015, 11:53. Показов 1839. Ответов 21

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Разрабатываю я свой браузер. Много вопросов по нему. И вот сегодня вопрос такой : я создал onnewwindow2, для того ,чтобы перехватывать ссылки (который открываются в новом окне(вкладке)). Создал я 2 процедуры

Delphi

procedure TForm1.WebBrowser1NavigateComplete2(Sender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
begin
  Edit1.Text:= URL;
  {WebBrowser1.Navigate2(URL);}
end;
 
procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
var
  newform: TForm1;
begin
   ppDisp:= WebBrowser1.DefaultDispatch;
   newform:= TForm1.Create(Self);
   newform.Show;
end;

Но перехватить ссылку не удается. Помогите перехватить ссылку в новое окно.

Вернуться к обсуждению:
OnNewWindow2 перехват ссылки в WB Delphi

Следующий ответ

Заказать работу у эксперта

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

25.01.2015, 11:53

Готовые ответы и решения:

Перехват ссылки из браузера
Доброго времени суток, не могли бы вы посоветовать, что можно сделать? Мне нужно при введении в...

Перехват ссылки/линка на файл
Мне интересно как файлообменник, например rapide.de умудряется правильно перехватывать линки:...

Перехват нажатия ссылки в теле письма с использованием VSTO
Добрый день уважаемы форумчане, возникла проблема при написании программы, нужно перехватить...

Как заменить все ссылки на текст кроме ссылки моего сайта?
Всем привет! Есть выражение и есть текст ссылками. Где ссылки заменяю на слова "Ссылки запрещены!"....

	25.01.2015, 11:53

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

25.01.2015, 11:53

Помогаю со студенческими работами здесь

Увеличить размер блока вокруг ссылки автовыравниванием по размеру ссылки
Как можно увеличить размер блока вокруг ссылки автовыравниванием по размеру ссылки? такое реально?

Зачем нужны rvalue ссылки, если есть универсальные ссылки
Читаю книгу Скотта Мэйерса... Что-то я совсем запутался с этими rvalue ссылками. Я не пойму, зачем...

Загрузка файла на сервер, добавление в базу данных ссылки и вывод ссылки из базы
Добрый вечер. Изучаю php, появился вопрос, а решить уже дня 3 не могу своими силами, поэтому прошу...

Как достать ссылки из Memo1 в Memo2 ссылки только которые оканчиваются на *.jpg *.gif
mmo1.Lines.Text:= idhtp1.Get('http://m.vk.com/album138983341_195657842'); этот код показывает...

Новые блоги и статьи
Как в цикле обойти все элементы map в Java bytestream 25.01.2025 В разработке на Java одной из наиболее востребованных структур данных является интерфейс Map, который предоставляет эффективный способ хранения и управления парами "ключ-значение". Разработчики. . .	Для чего нужен UserManager.isUserAGoat() в Android и как это использовать bytestream 25.01.2025 В мире Android-разработки существует множество интересных и порой загадочных функций, о которых знают далеко не все разработчики. Одной из таких функций является метод UserManager. isUserAGoat(),. . .	Как обойти масси в JavaScript. Всё о циклах bytestream 25.01.2025 JavaScript представляет собой мощный язык программирования, широко используемый в веб-разработке, где массивы и циклы являются фундаментальными концепциями для эффективной работы с данными. Массив в. . .	Как сделать, чтобы существующая ветка отслеживала удалённую в Git. Связывание локальных и удалённых веток bytestream 25.01.2025 В разработке программного обеспечения системы контроля версий стали неотъемлемой частью процесса создания качественного программного продукта. Эти инструменты позволяют разработчикам эффективно. . .	Как проверить, что файл НЕ существует с помощью Bash bytestream 25.01.2025 В системном администрировании проверка существования файлов является фундаментальной операцией, особенно при написании скриптов на Bash. Правильная обработка ситуаций, когда файл отсутствует,. . .	Как проверить, что строка пустая, неопределена или null в JavaScript bytestream 25.01.2025 При разработке веб-приложений на JavaScript разработчики регулярно сталкиваются с необходимостью проверки строковых значений на различные состояния. Валидация данных является критически важным. . .
Как проверить существование ключа в объекте или массиве в JavaScript bytestream 25.01.2025 При разработке веб-приложений на JavaScript программисты постоянно сталкиваются с необходимостью работать с объектами и массивами. Эти структуры данных являются фундаментальными элементами языка и. . .	Как создать ArrayList из массива (array) в Java bytestream 25.01.2025 При разработке программного обеспечения на языке Java программисты часто сталкиваются с необходимостью эффективного управления наборами данных. Массивы и ArrayList являются двумя фундаментальными. . .	Как сгенерировать случайные целые числа (int) в указанном диапазоне в Java bytestream 25.01.2025 В программировании генерация случайных чисел является важнейшим инструментом для решения множества практических задач. От создания игровых механик до реализации алгоритмов машинного обучения, от. . .	Как сделать, чтобы grep выводил строки до и после найденной hw_wired 25.01.2025 Утилита grep стала незаменимым инструментом для поиска и фильтрации информации в Unix-подобных операционных системах. Эта командная утилита позволяет осуществлять поиск строк, соответствующих. . .	Как клонировать определенную ветку в Git bytestream 24.01.2025 Одной из ключевых функций Git является возможность клонирования веток, что позволяет создавать локальные копии удаленных репозиториев и работать с определенными версиями проекта. Этот механизм. . .	Как в цикле обойти строки DataFrame в Pandas Python bytestream 24.01.2025 DataFrame представляет собой одну из основных структур данных в библиотеке Python Pandas, которая организует информацию в виде двумерной таблицы с строками и столбцами. Эта структура данных особенно. . .

Наверх