Konu: VFP dan Google Translate
UT de gordum işinize yarayabilir
&!& Author Borisslav Borissov
DECLARE INTEGER Sleep IN WIN32API INTEGER
LOCAL ieObj AS InternetExplorer.Application
*** Forgive my Spanish. This is from Google translate also :-)
TEXT TO lcTranslate NOSHOW
merhaba dünya
ENDTEXT
ieObj = CREATEOBJECT("InternetExplorer.Application")
ieObj.Visible = .t.
ieObj.Navigate2("http://translate.google.com/#tr|en|"+lcTranslate)
DO WHILE ieObj.ReadyState() # 4
Sleep(10)
ENDDO
Sleep(10)
ieTrans = ieObj.Document.GetElementById("result_box")
WAIT WINDOW ieTrans.innerText