Jump to content

AddJS ve SendResponse Farkı


multimesut

Recommended Posts

Merhaba,

 

Projemde anlık olarak js kodları çalıştırmam gerekiyor. AddJS ile bunu yapabiliyorum. SendResponse ilede bunu yapabiliyorum fakat SendResponse kullandığım yerdeki procedure nin o anki işlemleri çalışmıyor. Bu iki kod arasındaki fark nedir. Örnekte UniButton2Click da hiçbir şekilde UniLabel1 Caption u değişmiyor. SendResponse de neden böyle bir sorun oluşuyor?

//UniLabel1 Caption sorunsuz bir şekilde değişiyor.
procedure TMainForm.UniButton1Click(Sender: TObject);
begin
UniLabel1.Caption:='Mesut - 1';
UniSession.AddJS('alert("Mesut - 1");');
end;

//UniLabel1 Caption hiçbir şekilde değişmiyor.
procedure TMainForm.UniButton2Click(Sender: TObject);
begin
UniLabel1.Caption:='Mesut - 2';
UniSession.SendResponse('alert("Mesut - 2");');
UniLabel1.Caption:='Mesut - 2';
end;
Link to comment
Share on other sites

procedure TUniGUISession.SendResponse(RespStr:string; ExecCode: Boolean = True);
Doğrudan tarayıcıya tek bir bildirim gönderir. Zaten gönderme sırasındaki tüm bekleyen JS kodlarını temizler. İstemci tarafında programlama için uygundur. Bkz. CleintEvents-4 demosu.
ExecCode "True" ise kod yürütülür, aksi halde yürütülmez.
 
procedure TUniGUISession.AddJS(JS:string);

Her zaman çalıştırılan geçerli kod sırasına bir JS deyimi ekler.

 

 

Thank you #Delphi Developer

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...