Delphi Forum

Teşekkürler. Elinize sağlık.

Evet orayı 'message' olarak değiştirdim. Olmuyor.

Ayrıca bu fonksiyon lazım olduğundan bunuda ekledim;
function GetFormByNumber(document: IHTMLDocument2;
formNumber: integer): IHTMLFormElement;
var
forms: IHTMLElementCollection;
begin
forms := document.Forms as IHTMLElementCollection;
if formNumber < forms.Length then
result := forms.Item ...

@orhancc Visual C# 2008 Express Edition ile denedim. Login alanlarını doldurdu fakat Login butonuna tıklama yapmadı. MesajGir fonksiyonunuda manuel login olarak denedim o da textareaya herhangi birşey doldurmadı.

@orhancc C# ile ilgili hiç birşey bilmiyorum. Ama bir tane Visual C# edinip deneyeceğim.

procedure SetFieldValue(theForm: IHTMLFormElement;
const fieldName: string; const newValue: string;
const instance: integer=0);
var
field: IHTMLElement;
inputField: IHTMLInputElement;
selectField: IHTMLSelectElement;
textField: IHTMLTextAreaElement;
begin
field := theForm.Item(fieldName ...

Bir fikri olan var mı?

@orhancc evet sayfada 4 adet form var. Fakat message adlı textareayı doldurmak için bu yeterli olmuyor..

Bu fonksiyonu nasıl çağırıyoruz?

orhancc yazdı:yanlı id kullanıyorsun innertext ile dene olacaktır

Bu şekildede olmadı.

Loginde problem yok zaten. Mesaj atarken problem oluyor. Bu işe yaramıyor. Textareayı doldurmuyor yani. GetElementByName'de olmuyor.

Yahu forumda kendimi saymayım, bu konuda kaç defa yazıldı çizildi. Bir ay bile olmadı ki şunu yazmıştık...

http://www.delphiturkiye.com/forum/viewtopic.php?f=2&t=26298&p=147617#p147617

Özetle, "eğer click yapazak iteme ulaşamıyorsanız ve/veya aynı isimde birden fazla item varsa adını değil direkt ...

Aynı sorunu bende yaşıyorum. Urlparams'ı denedim fakat sadece getleri görüyor. IDleri nasıl bulacağız?

Form=00 item=01 - Name="keywords"
Form=00 item=02 - Name=""
Form=01 item=01 - Name="username"
Form=01 item=02 - Name="password"
Form=01 item=03 - Name="autologin"
Form=01 item=04 - Name="viewonline"
Form=01 item=05 - Name="redirect"
Form=01 item=06 - Name="sid"
Form=01 item=07 - Name="login"
Bu ...