Jump to content

Sherzod

Moderators
  • Posts

    19823
  • Joined

  • Last visited

  • Days Won

    644

Everything posted by Sherzod

  1. Sherzod

    UniDbGrid

    Hi, Which build are you using? Can you make a simple testcase?
  2. http://forums.unigui.com/index.php?/topic/15154-эффект-сворачиванияразворачивания-unimpanel/&do=findComment&comment=83109
  3. Hi, Only number, without changing the sorting of other fields?
  4. Please use OnLoaded() event: procedure TMainForm.UniTreeView1Loaded(Sender: TObject); begin UniTreeView1.FullExpand; end;
  5. Can you please make a simple testcase?
  6. Hi, Just change the value of the ImageIndex property.
  7. Hi Dominique, procedure TUniServerModule.UniGUIServerModuleHTTPCommand( ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo; var Handled: Boolean); begin // end;
  8. You can try different layouts, for example UniLoginForm1.Layout = auto.
  9. Hello, Use the Tabs property.
  10. Sherzod

    RemoteQuery

    Hello, Sorry for the late response. Please clarify your case again (step by step). Perhaps you need to use a different component, a different solution...
  11. Hello, procedure TMainForm.NavTreeClick(Sender: TObject); var Nd : TUniTreeNode; Ts : TUniTabSheet; FrC : TUniFrameClass; Fr : TUniFrame; FClassName, Path: string; begin Path := UniServerModule.StartPath + 'units\'; Nd := NavTree.Selected; if Nd.Count = 0 then begin Ts := Nd.Data; if not Assigned(Ts) then begin Ts := TUniTabSheet.Create(Self); Ts.PageControl := UniPageControl1; Ts.Closable := True; Ts.OnClose := TabSheetClose; Ts.Tag := NativeInt(Nd); Ts.Caption := Nd.Text; Ts.ImageIndex := Nd.ImageIndex; FClassName := 'TUni' + FileNames.Values[Nd.Text]; FrC := TUniFrameClass(FindClass(FClassName)); Fr := FrC.Create(Self); Fr.Align := alClient; Fr.Parent := Ts; Nd.Data := Ts; end; UniPageControl1.ActivePage := Ts; end; end; ...
  12. Or 1. procedure TMainForm.UniButton1Click(Sender: TObject); begin UniHTMLFrame1.HTML.Add('TEST<br>'); //UniHTMLFrame1.JSInterface.JSCallDefer('body.scroll', ['b', UniHTMLFrame1.JSInterface.JSStatement('Infinity')], 100); end; 2. UniHTMLFrame1 -> ClientEvents -> ExtEvents -> function afterupdatehtml(sender, eOpts) { sender.body.scroll('b', Infinity); }
  13. Try this approach: procedure TMainForm.UniButton1Click(Sender: TObject); begin UniHTMLFrame1.HTML.Add('TEST<br>'); UniHTMLFrame1.JSInterface.JSCallDefer('body.scroll', ['b', UniHTMLFrame1.JSInterface.JSStatement('Infinity')], 100); end;
  14. Здравствуйте, Есть ли тестовый случай для проверки?
  15. Please check again, it works for me.
  16. You can use this solution for example. procedure TMainForm.UniButton1Click(Sender: TObject); begin UniStringGrid1.Cells[1, 1] := '<img src="https://www.google.com/images/branding/googlelogo/2x/googlelogo_color_92x30dp.png" height="15px" width="auto"></img>' end; Result:
  17. Actually, UniStringGrid is not meant for this.
  18. Hello, Please make a simple testcase to check.
×
×
  • Create New...