Merhaba;
Buton tıklama ile ilgili çokça konu açılmış ama hiç biri ile çözüm bulamadım.
Görseldeki Next butonuna tıklama gerçekleştirmek istiyorum ama maalesef yapamadım.
Class "s-pagination-item-next-button" sabit sadece Href içindeki bilgiler her seferinde farklı geliyor.
Next butonuna tıklamayı nasıl yapabilirim?
Buton tıklama ile ilgili çokça konu açılmış ama hiç biri ile çözüm bulamadım.
Görseldeki Next butonuna tıklama gerçekleştirmek istiyorum ama maalesef yapamadım.
Class "s-pagination-item-next-button" sabit sadece Href içindeki bilgiler her seferinde farklı geliyor.
Next butonuna tıklamayı nasıl yapabilirim?
IDoc.Close; I := 0; aDIVtags := IDoc.All.Tags('div'); IDivSay := IDoc.Body.All.Tags('div').Length; while I < IDivSay do begin aClassName := aDIVtags.Item(I).ClassName; if SameText(aClassName, 'a-text-center-s-pagination-container') then begin aTableRows := aDIVtags.Item(I).All.Tags['span']; for iRow := 0 to aTableRows.Length - 1 do begin aTableCols := aTableRows.Item(iRow).All.Tags['a']; for iCol := 0 to aTableCols.Length - 1 do begin if SameText(aTableCols.Item(iCol).ClassName, 's-pagination-item-next-button') then // Link Next begin SearchBoxHavuz.Text := BreakOff(aTableCols.Item(iCol).Href + 'about:', 'about:', 'about:'); ShowMessage(aTableCols.Item(iCol).InnerTEXT); Sleep(3750); I := 0; Exit; end;