From | HENK SIMMELINK
/---------------------------------------
> Is there no command to change the VarTabs-variable interactively?
> Now I have to do: {Change it}
> Because I do a lot of "kolumn-jobs" lately, this is, so you
> probably can imagine, not my way of having a nice time.... :-)
\---------------------------------------
To | GEORGE DE BRUIN
Hello Henk,
The problem here is that the string that is passed into TabSet() has to
be a _constant_ string. It cannot be a variable that you read in
dynamically. You should be able to do something like this:
// TabSetMenu(): A Menu containing select variable tab stop settings.
menu TabSetMenu()
"1, 4, 7, 10..."
"5, 10, 15, 20..."
"10, 20, 40, 60..."
end
// SetVarTabs():
//
// - Display the TabSetMenu()
// - Use the selected Item to set the variable tab stops.
proc SetVarTabs()
integer WhichString
TabSetMenu()
WhichString = MenuOption
if WhichString
Case WhichString
when 1 Set(VarTabs, TabSet("1 4 7 10"))
when 2 Set(VarTabs, TabSet("5 10 15 20"))
when 3 Set(VarTabs, TabSet("10 20 40 60"))
EndCase
endif
end
SetVarTabs()
George J. De Bruin
SemWare Technical Support
-- SPEED 2.0h #10: TSE Jr, MEM-RES, OS/2 & The SemWare Editor Professional
--- FidoPCB v1.4 [ff151/a]
---------------
* Origin: SemWare Support BBS * 404-641-8968 * (1:133/314)
|