nWa-Boter

może po kolei jak przypisać znaczniki kodu html dla komponentów takich jak: EDIT BUTTON COMBOBOX RADIOBUTTON LISTVIEW LABEL

witam zakupiłem bota lecz ma on zablokowane pole EDIT gdzie wpisuje się e-mail po otworzeniu tego pliku .exe Resource Hackerem wywala mi błąd: This file has a not-standard resource layout... its has probably been compressed with an "EXE Compressor". chodzi mi o to by odblokować jedynie te pole za wytłumaczenie lub zrobienie mi tego dam komuś maksymalną ilość PLUSÓW program wyślę jak ktoś się do mnie zgłosi

no niby ok na nowo stworzonym programie ale na moim GUI mam 2 błędy: Build [Error] Unit1.pas(114): Identifier redeclared: 'TForm1.Button1Click' [Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas' var Unit1 in 'Unit1.pas' {Form1};

laB2 gościu udało mi się zalogować w grze po kilku próbach no muszę przyznać że warto było 1 krok za mną dzięki.

no ok ale jak to zrobić by od razu mi to wpisało na stronie gry?

tylko tamten temat jest napisany pod Microsoft Visual Basic a mi chodzi o Delphi

aha ok ale jak znaleźć źródło danego elementu na IE bo ten wyżej znalazłem przez Firebuga na MF no i ten kolor pomarańczowy kodu na forum to służy po to by tam wpisać np. e-mail tak? 'E-mail'

witam ponownie !!! np. mam kawałek zródła gry (to jest w MF nie IE-wiem): <input type="text" onfocus="if(this.value=='E-mail') this.value=''" value="E-mail" name="email" id="email"> jest to pole do wpisania e-maila,to tylko to mi wystarczy do stworzenia bota czy też muszę te zródło jakoś przerobić?

nie mogę edytować pola edit4 oto kod: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, XPMan, StdCtrls, ExtCtrls, Mask, OleCtrls, SHDocVw; type TForm1 = class(TForm) XPManifest1: TXPManifest; PageControl1: TPageControl; TabSheet1: TTabSheet; GroupBox1: TGroupBox; Edit1: TEdit; MaskEdit1: TMaskEdit; Label1: TLabel; Label2: TLabel; Button1: TButton; TabSheet2: TTabSheet; GroupBox2: TGroupBox; ComboBox1: TComboBox; ComboBox2: TComboBox; ComboBox3: TComboBox; Label3: TLabel; Label4: TLabel; Label5: TLabel; Button2: TButton; Button3: TButton; Button4: TButton; TabSheet3: TTabSheet; GroupBox3: TGroupBox; RadioButton1: TRadioButton; RadioButton2: TRadioButton; ComboBox4: TComboBox; Button5: TButton; Button6: TButton; TabSheet4: TTabSheet; GroupBox4: TGroupBox; Edit2: TEdit; Edit3: TEdit; Label6: TLabel; Label7: TLabel; ListView1: TListView; Button7: TButton; Button8: TButton; TabSheet5: TTabSheet; GroupBox5: TGroupBox; Label8: TLabel; Label9: TLabel; Label10: TLabel; Label11: TLabel; Label12: TLabel; Label13: TLabel; Label14: TLabel; Label15: TLabel; Label16: TLabel; TabSheet6: TTabSheet; WebBrowser_V11: TWebBrowser; Panel1: TPanel; Edit4: TEdit; Button9: TButton; Button10: TButton; Button11: TButton; Button12: TButton; Button13: TButton; Label17: TLabel; procedure Button9Click(Sender: TObject); procedure Button10Click(Sender: TObject); procedure Button11Click(Sender: TObject); procedure Button12Click(Sender: TObject); procedure Button13Click(Sender: TObject); procedure Edit4Change(Sender: TObject); procedure MaskEdit1Change(Sender: TObject); procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Button5Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button9Click(Sender: TObject); begin WebBrowser_V11.GoBack; end; procedure TForm1.Button10Click(Sender: TObject); begin WebBrowser_V11.GoForward; end; procedure TForm1.Button11Click(Sender: TObject); begin WebBrowser_V11.Navigate(Edit4.Text); end; procedure TForm1.Button12Click(Sender: TObject); begin WebBrowser_V11.Stop; end; procedure TForm1.Button13Click(Sender: TObject); begin WebBrowser_V11.Refresh; end; procedure TForm1.Edit4Change(Sender: TObject); begin Edit4.Text:= WebBrowser_V11.LocationURL; end; procedure TForm1.MaskEdit1Change(Sender: TObject); begin MaskEdit1.PasswordChar:='*'; end; procedure TForm1.Button1Click(Sender: TObject); begin PageControl1.TabIndex := 1 end; procedure TForm1.Button2Click(Sender: TObject); begin PageControl1.TabIndex := 2 end; procedure TForm1.Button5Click(Sender: TObject); begin PageControl1.TabIndex := 3 end; end.

dziwne ale w przeglądarce nie mogę zmienić wpisywanego tekstu do pola edit tam gdzie jest adres strony porównywałem w innych editach w których normalnie zmieniam i nic się nie różni

No trochę grzebie teraz w AutoIT bardzo dobrze wszystko wyjaśnione w Delphi powinni też tak to wszystko wyjaśnić mniej problemów by było a co do AutoIT to można go jakoś wizualnie polepszyć i czy można dać drzewo?

możesz dokładnie to opisać? -np czy wygląd jest taki sam jak w Delphinie 7 -czy jest prostszy w obsudze -jego wady zalety -i czy byś mi pomagał w stworzeniu bota ps. no tak kursorem nie myszką za pomoc mogę dawać tobie plusy

Ja chcę zaczerpnąć wiedzy na temat Delphi 7 a nie do AutoIT-według mnie to jest syf ingerujący w manualne poruszanie myszką.

zamknij k...a m...ę jak nie masz nic mądrego do powiedzenia twój post też jest spamem

no to teraz łapię mniej więcej o co biega laB2 jesteś wielki mistrzu wysyłam plusy.