` Saving and restoring listbox formatting -- Template (James Cooke ) - Icetips Article
Icetips - Templates, Tools & Utilities for Clarion Developers

Templates, Tools and Utilities
for Clarion Developers

Icetips Article

Back to article list   Search Articles     Add Comment     Printer friendly     Direct link  

Par2: Saving and restoring listbox formatting -- Template
2000-01-12 -- James Cooke
 
Here is a quick 'n dirty template I use for that: #Extension(ColumnDefaults,'Save browse column width'), PROCEDURE #Prompt('Select Listboxes',Control), %ListBox, Multi('Listboxes to default') #AT(%WindowManagerMethodCodeSection,'Init','(),BYTE'),LAST #FOR(%ListBox) If getini('%Procedure','%ListBox',,'%Application.INI') <> '' %ListBox{prop:format}=getini('%Procedure','%ListBox',,'%Application.INI') END #EndFor #ENDAT #AT(%WindowManagerMethodCodeSection,'Kill','(),BYTE'),FIRST #FOR(%ListBox) Putini('%Procedure','%ListBox',%ListBox{prop:format},'%Application.INI') #EndFor #ENDAT


Today is April 23, 2024, 7:47 pm
This article has been viewed 35115 times.



Back to article list   Search Articles   Add Comment   Printer friendly

Login

User Name:

Password: