F�rum DragDrop #382999

06/08/2010

Galera construi um formulario com 2 listbox para arrastar item de um para outro deu certo mas me surgiu uma d�vida quando aos typecasting

procedure TForm1.ListBox1DragDrop(Sender, Source: TObject; X, Y: Integer);
var
 item: string;
begin
   item:= (Source as TListBox).Items[(Source as TListBox).ItemIndex];
   TListBox(Sender).Items.Add(item);
end;

eu nao entendi o porque fazer um casting na parte em vermelho.
Porque nao posso usar ?

  item:= (Source as TListBox).Items[ItemIndex];

Jonathan Campos

Curtir t�pico

+ 0

Responder

Posts

06/08/2010

Eriley Barbosa

Porque da erro: [Error] Unit1.pas(31): Undeclared identifier: 'ItemIndex' Atenciosamente Eriley

Responder

Gostei + 0