Несколько Вопросов

[Дорст]

Здравствуйте!

Вот с Веба решил перейти на Delphi но сталкнулся с некоторыми проблемами, если можно помогите:
1. Как сделать так чтобы Popupmenu в ListBox появлялось только при наведении на строку.
2. Как сделать так чтобы при клике на строку в ListBox Открывалось новая форма и при этом как передать в форму данную строку.
3. И если можно обьясните ещё раз по подробней как можно в каждой троке вставить картинку.

P.S. Спасибо огромное Всем кто откликнулся. Учу дельфи 5 день пишу клиент информера.

[Stilet]

Как сделать так чтобы Popupmenu в ListBox появлялось только при наведении на строку.

Это не сложно, но учти что после появления меню требует обязательного щелчка по его пункту. Поэтому в данном лучае мне кажется целесообразнее заменить меню ЛистБоксом, например так:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus, StdCtrls;

type
  TForm1 = class(TForm)
    ListBox1: TListBox;
    PopupMenu1: TPopupMenu;
    N11: TMenuItem;
    N21: TMenuItem;
    procedure ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
      Y: Integer);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var      l:TListBox;
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var i:integer;
begin
i:=ListBox1.ItemAtPos(Point(x,y),true);
if i>-1 then begin
  l.Items.Clear;
  l.Items.Add(ListBox1.Items[i]);
  l.Items.Add('Cancel');
  l.Top:=ListBox1.Top+y;
  l.Left:=ListBox1.Left+ListBox1.Width;
  l.Show;
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
l:=TListBox.Create(Self);
l.Parent:=Self;

end;

end.

Как сделать так чтобы при клике на строку в ListBox Открывалось новая форма и при этом как передать в форму данную строку.

В листбоксе есть событие OnClick, в нем нужно прописать показ нужной формы, в свойствах которой будет определенная строковая переменная, туда и передавать ListBox.Items[ListBox.ItemIndex].

[BOBAH13]

А почему не легче просто проверять по события нужному ListBox.ItemIndex >= 0 ???

[Stilet]

А почему не легче просто проверять по события

Какому "события"?