Líderes

Olá pessoal, eu estava na net procurando uns tutoriais de VB e achei uma apostila de 100 páginas e vou compartilhar com vocês... Download: Apostila de VB.rar Scan: VirusTotal *Apostila baseado em VB6 Espero que gostem; Abraços.

Para restaurar o mesmo form (depois de escondido), será necessário usar a função em algum evento do NotifyIcon ou do ContextMenuStrip . Já que com um button, será necessário que o form esteja visível.

Tente, use a lógica, fuce nas funções. Digite "p." Veja o que tem, teste o que tem. Teste em um botão p.Walk Teste p.Turn Vai testando, veja tutoriais explicando funções como o meu do Player. 'Se vire'. Depois se não conseguir venha 'pedir' códigos e/ou ajuda. E se você fuçar pelo fórum vai achar heal, anti-idle E level spy. Abraços.

Auto Eat Usando Para usar coloque em algum timer ou algo que você preferir e recomendo interval 30000 (30 segundos). Toda vez que esse timer for ativado ele irá verificar no inventário ou no slot de munição se há food e se tiver ele irá usar. Verificando no Inventário Dim Food As Item = client.Inventory.GetItems().FirstOrDefault(Function(ia) Constants.ItemLists.Foods.Keys.Contains(ia.Id)) If Food IsNot Nothing Then Food.Use() End If Verificando no slot de munição Dim Food3 As Tibia.Objects.Item = client.Inventory.GetItemInSlot(Tibia.Constants.SlotNumber.Ammo) If Food3 IsNot Nothing AndAlso Tibia.Constants.ItemLists.Foods.ContainsKey(Food3.Id) Then client.Inventory.GetItemInSlot(Tibia.Constants.SlotNumber.Ammo).Use() End If

fico feliz por isso, gostou REP++1 pls

Criando um programa básico que treme o Form {Iniciando em Delphi} Necessário: Delphi 7 (Em breve link para download) Criando e organizando o Form Caso um projeto não foi criado, vá no menu "File" >> "New" >> "Application", e aparecerá um Form1 em branco. Agora ainda na aba "Standard" selecione um "Button" e coloque no Form1 Código Dê dois cliques no form para ir para a parte de código e depois de implementation {$R *.dfm} Adicione isto: procedure Tremer(frm: HWND); var r: TRect; i: integer; n1, n2: integer; begin getwindowrect(frm,r); for i:= 0 to 50 do begin n1:=random(5); n2:=random(5); setwindowpos(frm,0,r.Left+n1,r.Top+n2,r.Right-r.Left,r.Bottom-r.Top,0); sleep(20); end; setwindowpos(frm,0,r.Left,r.Top,r.Right-r.Left,r.Bottom-r.Top,0); end; Agora o código do botão Dê dois cliques no "Button1" e coloque o seguinte código para chamar a função tremer(handle);

Isso, que nem msn.