Как осуществить быстрый поиск в Listbox

id: 79 Комментарии: 0 Просмотров: 1132 Автор: Reif Категория: Работа с текстом

Нажмите для увеличения на картинку

Как осуществить быстрый поиск в Listbox

Очень просто, смотри пример....
считаем, сто есть поле Edit1, в котором набираем текст, и ListBox, в котором ищем нужную строку, (как в Нelp).

Код

procedure TForm1.Edit1Change(Sender: TObject);
begin
ListBox1.Perform(LB_SELECTSTRING,-1,longint(Pchar(Edit1.text)));
end;

end.

Скачать / далееДата: 26.02.2013 Время: 15:52 День: Вторник

Меню с картинками в Делфи

Графика, оформление

id: 78 Комментарии: 0 Просмотров: 1441 Автор: Reif Категория: Графика, оформление

Нажмите для увеличения на картинку

Как сделать пункты меню с картинками

Следующий код показывает, как добавить картинку в виде объекта TImage в объект TMenuItem.

Код

var
  hHandle: THandle;
  x: integer;
  // visual controls:
  hMenu: TMenuItem;
  Image1: TImage;

...

  x:= 10; // десятый пункт меню
  hHandle := GetMenuItemID(hMenu.handle, x);
  ModifyMenu(hMenu.handle, hHandle, MF_BYCOMMAND Or MF_BITMAP, hHandle,
&nb ... Читать дальше »

Скачать / далееДата: 26.02.2013 Время: 15:45 День: Вторник

Браузер еще один пример собственного браузера в Делфи

Интернет и сети

id: 77 Комментарии: 0 Просмотров: 2342 Автор: Reif Категория: Интернет и сети

Нажмите для увеличения на картинку

Ты снова должен запустить Delphi. Именно он позволяет очень быстро и без особых проблем написать свой собственный браузер. Когда запустишь, то найди закладку "Internet". Здесь должен быть компонент "WebBrowser" (он должен быть последний). Если у тебя версия Delphi меньше, чем пятая, то этого компонента может и не быть. Он может отсутствовать и если ты отказался устанавливать инет-компоненты (по умолчанию они ставятся).

Выбери "Import ActiveX Control" из меню "Component". Перед тобой должно открыться окно, как на рисунке 1