j, I'm not sure how much this will save time on your tests but on my code, which still is 76k in size, it saved 20seconds of processor time.

so, this change does not speed up the conversion, just the load. I did some speeding thingies for conversion too but their benefit was not so huge.

anyway, openclick with this code did wonders. readfile() is directly from udf-library.
code:
function btnOpen_Click()
    dim $FileName, $nl
    $FileName = $frm.FileOpenDialog("Open",$PathOpen,, "KiX Files|*.kix;*.udf;*.k2k;*.udf|All Files|*.*",1)
    if $FileName
	$frm.MousePointer   = 11
	$lblStatus1.Caption = ""
	$btnCopy.Enabled    =  0
	$btnSave.Enabled    =  0
	$btnClear.Enabled   =  0
	$txtTarget.Text     = ""
	$txtSource.Text     = ""
	$txtSource.BeginUpdate
	$txtSource.Text=readfile($Filename,@crlf)
        if not @error
		$PathOpen = substr($FileName,1,instrrev($FileName,'\')-1)
		$ = writeprofilestring($Wordfile,"Global","PathOpen",$PathOpen)
		$txtSource.EndUpdate
		$frm.MousePointer   = 0
		$lblStatus1.Caption = " " + $FileName
		if $txtSource.Text
			$btnConvert.Enabled = 1
		else
			$btnConvert.Enabled = 0
		endif
	endif
    endif
endfunction
sorry for exposing part of the code but this seemed to be best way to get the message to you [Razz]
_________________________
!

download KiXnet