newsanti

How can parse css file with unigui utility? to add remove css in css file of servermodule.

My method generate many events. don't work.

Do you have other choice to check end scroll? some time H3=1 instand H3=0

function afterrender(sender, eOpts) { var me = sender; me.el.dom.addEventListener('scroll', function(event) { var element = event.target; if (element.scrollTop === 0) { ajaxRequest(me, 'scrolledToTop', []); } else { var H1 = Math.round(element.scrollHeight-element.scrollTop); var H2 = Math.round(element.clientHeight); var H3 = H1-H2; if (H3===0) { ajaxRequest(me, 'scrolledToBottom', {'scrollTop': element.scrollTop, 'scrollHeight': element.scrollHeight, 'clientHeight': element.clientHeight, 'H1': H1, 'H2': H2, 'H-T': H1-H2 }); } } }) } work!

VerticalScrollEnd.zip

function afterrender(sender, eOpts) { var me = sender; me.el.dom.addEventListener('scroll', function(event) { var element = event.target; if (element.scrollTop === 0) { ajaxRequest(me, 'scrolledToTop', []); } else if (element.scrollHeight-element.scrollTop===element.clientHeight) { ajaxRequest(me, 'scrolledToBottom', []); <== don't fire event } }) }

How to ajaxRequest of TuniFrame on end vertical scroll ? VerticalScrollEnd.zip

Any Idea? write yellow background and progress 80%.

Columns[0].Ellipsis:= False; (StringField) Columns[1].Ellipsis:= False; Columns[2].Ellipsis:= True; (MemoField)

Everyone in the team has their own personal license.

YES. Everyone in the team has their own personal license.

he is my friend. work together.

How to Tunimemo change height with body height after user input?

1.90.0.1568

How to paint color of dbgrid cell with 50% height or 20% width ?

How to apply tunistringgrid with multi-line groupheader like tunidbgrid?

after zoom in ...horizontal scrollbar width not changed. can't move image left or right.

PicViewer.zip

VerticalPanelCaption.zip

procedure TMainForm.UniButton1Click(Sender: TObject); begin var S: string:= UniEdit1.Text; S:= S.Replace('<','&lt;'); S:= S.Replace('>','&gt;'); UniEdit2.Text:= S; UniLabel1.Caption:= S; UniStringGrid1.Cells[1,1]:= S; end;

procedure TMainForm.UniButton1Click(Sender: TObject); begin var S:= UniEdit1.Text; UniLabel1.Caption:= S; UniStringGrid1.Cells[1,1]:= S; //<--- not showing <reserved> end; EditTagAsString.zip