OpenEuphoria

RE: File extensions

• Posted by Ray Smith <smithr at ix.net.au> Feb 13, 2001
• 429 views

Hi Tony,

I don't think your problem is in the code you posted. It is possibly 
somewhere else in your program.

I gave your code a quick test and it returns exactly what you are 
after.

You might like to try running it with the debugger (trace(1)) and
see where else it might be failing.

Ray Smith.


Tony Steward wrote:
> Hi all,
> Ok I am writin a prog using EDB but I want to use my own extensions. The 
> 
> idea is that there is two databases the main file with extension KTM 
> (KeyTrackerMain) and the second file KTH (KeyTrackerHistory).
> when the user selects "Open" from the menu they will only see the KTM 
> file. The procedure below does this but I can't create the second file 
> with the KTH i always get filename.KTH.KTM
> 
> 
> procedure OpenChoice_onClick ()
> filenamemain = getOpenFileName( 
>     MainWindow,                  -- parent window 
>     "",                         -- no default name 
>     { "KeyTrack File", "*.KTM"} )
>     if length( filenamemain ) = 0 then 
>         return 
>     end if
> 
> filenamehist = filenamemain[1..length(filenamemain)-4] & ".KTH"
> 
> 
> Come visit me at www.locksdownunder.com
> 
> 



Ray Smith
http;//www.geocities.com/ray_223