Converter Delphi para C/C
03/06/2003
0
Alguem poderia me explicar o que faz [b:fa191a4565]with TListBox(Sender) do[/b:fa191a4565] do código abaixo:
begin
[b:fa191a4565]with TListBox(Sender) do[/b:fa191a4565]
begin
DropIndex := ItemAtPos(Point(X,Y), True);
if (DropIndex > -1) and (DropIndex <> ItemIndex) then
begin
TempStr := Items[DropIndex];
Items[DropIndex] := Items[ItemIndex];
Items[ItemIndex] := TempStr;
ItemIndex := DropIndex;
end;
end;
end;
Precisso converter em c este código mas ñ sei o que significa
Em C ficaria assim (sem converter [b:fa191a4565]with TListBox(Sender) do[/b:fa191a4565])
{
[b:fa191a4565]with TListBox(Sender) do[/b:fa191a4565] //como é isto ???????
{
DropIndex = ItemAtPos(Point(X,Y), True);
if ((DropIndex > -1) && (DropIndex != ItemIndex) )
{
TempStr = Items[DropIndex];
Items[DropIndex] = Items[ItemIndex];
Items[ItemIndex] = TempStr;
ItemIndex = DropIndex;
}
}
}
begin
[b:fa191a4565]with TListBox(Sender) do[/b:fa191a4565]
begin
DropIndex := ItemAtPos(Point(X,Y), True);
if (DropIndex > -1) and (DropIndex <> ItemIndex) then
begin
TempStr := Items[DropIndex];
Items[DropIndex] := Items[ItemIndex];
Items[ItemIndex] := TempStr;
ItemIndex := DropIndex;
end;
end;
end;
Precisso converter em c este código mas ñ sei o que significa
Em C ficaria assim (sem converter [b:fa191a4565]with TListBox(Sender) do[/b:fa191a4565])
{
[b:fa191a4565]with TListBox(Sender) do[/b:fa191a4565] //como é isto ???????
{
DropIndex = ItemAtPos(Point(X,Y), True);
if ((DropIndex > -1) && (DropIndex != ItemIndex) )
{
TempStr = Items[DropIndex];
Items[DropIndex] = Items[ItemIndex];
Items[ItemIndex] = TempStr;
ItemIndex = DropIndex;
}
}
}
Xandyr
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)