procedure TForm3.bAuthSelectJQButtonOptionsClick(Sender: TObject; AParams: TStringList);
var
alItem: TIWCGJQSelectableItem;
begin
while not ADOQuery1.Eof do
alItem := IWCGJQSortableList1.Items.Add;
alItem.Caption := ADOQuery1.FieldByName('Name').AsString;
alItem.DisplayName := ADOQuery1.FieldByName('Name').AsString;
IWCGJQSortableList1.Update;
ADOQuery1.Next;
end;
end;
is not working, what I'm doing wrong?
Best Regards
Francisco Alvarado