Jump to content

Recommended Posts

Posted

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;
Posted
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

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...