Thanks Michael! Your code works perfect! Tiemo
> -----Ursprüngliche Nachricht----- > Von: use-livecode [mailto:use-livecode-boun...@lists.runrev.com] Im Auftrag > von Michael Doub > Gesendet: Dienstag, 9. Juli 2013 22:09 > An: How to use LiveCode > Betreff: Re: How to increase the textsize of HTMLtext proportional? > > A bit more suitable for easy reuse..... > > > on textdown > BumpText the long id of field "test", -1 end textdown > > on textup > BumpText the long id of field "test", 1 end textup > > > on BumpText theObject theDirection > if theDirection is not among the lines of "1" & return & "-1" then > throw "Need 1 or -1 for theDirection" > put the htmlText of fld 1 into theHtml > replace "size=""e with "size="&numtoChar(1500) in theHTML > set the itemdel to numToChar(1500) > if the number of items of theHTML<>1 then > put 0 into itemCount > repeat for each item theItem in theHTML > add 1 to itemCount > if itemCount=1 then > put theItem into newHTML > next repeat > end if > put 1 into counter > put offset (">", theItem) into tClose > put offset ("<" , theItem) into tOpen > if tClose <> 0 then -- found it > if tOpen <> 0 and tOpen > tClose then-- found "<" and after > ">" whis is ok > repeat forever > add 1 to counter > if char counter of theItem=quote then exit repeat > end repeat > put char 1 to counter-1 of theItem into theSize > put theSize + theDirection into theSize > put theSize into char 1 to counter-1 of theItem > end if > end if > put quote&theItem after newHTML > end repeat > set the htmlText of theObject to newHTML > end if > set the textSize of theObject to \ > the effective textSize of theObject + theDirection end BumpText > > _______________________________________________ > use-livecode mailing list > use-livecode@lists.runrev.com > Please visit this url to subscribe, unsubscribe and manage your > subscription preferences: > http://lists.runrev.com/mailman/listinfo/use-livecode _______________________________________________ use-livecode mailing list use-livecode@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-livecode
