

Bismillah ilk projede hata aldım, çok şükür exe'mize haram bulaşmadı... Sebebi hikmetini anladım da teorik nedenini merak etmedim değil.
Birazdan yeşerecek olan satırlarda göreceğiniz üzere kullandığım procedure, 2007 sonrası sürümlerde üzerime aşırı yükleniyorsun triplerine giriyor.
Kod: Tümünü seç
procedure TForm1.Mylink(lbldurum:TLabel;browser:TEmbeddedWB;link:String);
var
EncodedDataString: string;
PostData : OleVariant;
Headers : OleVariant;
I : Integer;
begin
Application.ProcessMessages;
EncodedDataString := Format('arama=%s&submit=++Ara++',['Matrix']);
PostData := VarArrayCreate([0, Length(EncodedDataString) - 1], varByte);
for I := 1 to Length(EncodedDataString) do
PostData[I-1] := Ord(EncodedDataString[I]);
Headers := 'Content-Type: application/x-www-form-urlencoded' + #10#13;
browser.Navigate((link),EmptyParam,EmptyParam,PostData,
Headers);
Repeat
Application.ProcessMessages;
// lbldurum.Caption:='Yükleniyor...';
gecikme(10);
until (browser.ReadyState = ReadyState_Complete);
// lbldurum.Caption:='Sayfa Yüklendi';
end;
[DCC Error] Unit1.pas(1744):E2250 İdraki meali bu küçük akla gerekmez zira bu IDE bu yordamı desteklemez
Olay yeri:
browser.Navigate((link),EmptyParam,EmptyParam,PostData,
Headers);
İngilizcem çok iyi değil ben böyle mana verdim ama belki yanılmışımdır
Orjinali:
There is no overload version of ‘Navigate’ that can be called with these arguments