Source position: tcl80.pp line 677
type TTclDriverSetOptionProc = function(
instanceData: Tcl_ClientData;
interp: PTcl_Interp;
optionName: PAnsiChar;
value: PAnsiChar
):Integer;