Not able to create rich edit control

[Zieq 0]

i am trying to create two rich edit control to have link text on it.

when i run my script i just see only one rich edit control created on to dialog. i dont see second edit control getting created.

Can anyone help me why its not getting created?

expandcollapse popup

;Include files
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
#include <FileConstants.au3>
#include <MsgBoxConstants.au3>
#include <StringConstants.au3>
#include <Array.au3>
#include <Excel.au3>
#include <GuiRichEdit.au3>

;global dialog member variables


;Local dialog member variables
Global $gCRNumber_Data, $gDesignLink_Data, $gCodeLink_Data

$gMainDialog = GUICreate("Get Design and Code Links", 392, 250, 100, 100)

GUICtrlCreateLabel("CR: ", 40, 43, 50, 20)
$gCRNumber = GUICtrlCreateEdit("", 85, 40, 120, 20, BitOR($ES_NUMBER, $ES_WANTRETURN))

GUICtrlCreateLabel("Design Link: ", 15, 70, 60, 20)
$gDesignLink = _GUICtrlRichEdit_Create($gMainDialog,"", 85, 70, 300, 40,BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))

GUICtrlCreateLabel("Code Link: ", 15, 140, 60, 20)
$gCodeLink = _GUICtrlRichEdit_Create($gMainDialog,"", 85, 140, 300, 40,BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))

$gCancelButton = GUICtrlCreateButton("Cancel", 10, 210, 80, 30)
$gAddButton = GUICtrlCreateButton("Add", 105, 210, 80, 30)
$gGetDesignButton = GUICtrlCreateButton("Get Design", 203, 210, 80, 30)
$gGetCodeButton = GUICtrlCreateButton("Get Code", 300, 210, 80, 30)

;Main Logic in while loop
GUISetState(@SW_SHOW)
; Run the GUI until the dialog is closed
While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                ExitLoop

            Case $gAddButton
                            $gCRNumber_Data = GUICtrlRead($gCRNumber, 1)
                            $gDesignLink_Data = GUICtrlRead($gDesignLink, 1)
                            $gCodeLink_Data = GUICtrlRead($gCodeLink, 1)

                            Local $sFilePath1 = @ScriptDir & "\CR_DATA.xlsx" ;This file should already exist
                            If Not FileExists($sFilePath1) Then
                                MsgBox(16, '', 'Does NOT exists')
                                Exit
                            EndIf
                            Local $oExcel = _ExcelBookOpen($sFilePath1)
                            _ExcelRowInsert($oExcel, 1, 1)
                            _ExcelWriteCell($oExcel, $gCRNumber_Data, 1, 1)
                            _ExcelWriteCell($oExcel, $gDesignLink_Data, 1, 2)
                            _ExcelWriteCell($oExcel, $gCodeLink_Data, 1, 3)
                            _ExcelBookSaveAs($oExcel, @ScriptDir & "\CR_DATA.xlsx", "xlsx", 0, 1)
                            _ExcelBookClose($oExcel) ; And finally we close out
                                                        
            Case $gGetDesignButton

            Case $gGetCodeButton
        EndSwitch
WEnd
GUIDelete()

Edited April 20, 2014 by Zieq

[Melba23 2,629]

Zieq,

What AutoIt version are you running? There was a problem a while back with multiple RichEdit controls, but in the last release (3.3.10.2) I see both being created.

This snippet will tell you which version you have:

MsgBox(0, "Version", @AutoItVersion)

M23

[Zieq 0]

my version is 3.3.8.1
i will try to update and check. hope that will resolve my problem.