HI erstmal!
Ich hab da ein problem. genaugenommen zwei!
1. mit dem buton "Hinzufügen" lassen sich die edits hinzufügen (wer hätte das gedacht), sie sollen aber nur in tabsheet3 sein und nicht auch in 2. der hinzugefügte script muss also in den teil von 3 hinzugefügt werden. Nur wie??
2. damit man auch mehr reihen edits hinzugefügt werden können als platz auf dem tabsheet ist. also müsste da eine scrollbar rein! problem ist wieder das tabsheet das meines wissensstandes nicht vorsiet. also geht das überhaup?? wenn ja, wie?? und wenn nein wären alternativen nett die den aufbau an sich nicht ganz durcheinander bringen!
ich bedanke mich schon mal im vorraus
Spoiler anzeigen
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.6.1
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#include <ScrollBarConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiButton.au3>
#include <StructureConstants.au3>
#include <GUIScrollBars.au3>
;#include <GUIScroll.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
Global $sIni = @ScriptDir & "\Gui.ini"
Global $iEdits = IniRead($sIni, "Edits", "Count", 1)
Global $hEdit[$iEdits], $iTop = -20
$Kundenkartei = GUICreate("Kundenkartei", 1401, 992, -4, -4)
$Load = GUICtrlCreateButton("Load", 30, 16, 75, 25)
$Save = GUICtrlCreateButton("Save", 130, 16, 75, 25)
$PageControl1 = GUICtrlCreateTab(39, 65, 1204, 824)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet2 = GUICtrlCreateTabItem("1 ")
$TabSheet3 = GUICtrlCreateTabItem("2 ")
$hAdd = GUICtrlCreateButton("Hinzufügen", 330, 16, 75, 25)
For $i = 0 To $iEdits - 1
_newEdit($i)
Next
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")
_GUIScrollBars_Init($TabSheet3)
GUISetState(@SW_SHOW)
;Scrollbar_Create($TabSheet3, $SB_VERT, 10000)
;Scrollbar_Step(20, $TabSheet3, $SB_VERT)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $hAdd
ReDim $hEdit[UBound($hEdit) + 1]
_newEdit($iEdits)
$iEdits += 1
EndSwitch
WEnd
Func _newEdit($iEditNr)
ConsoleWrite($iEditNr & @CRLF)
$iTop += 110
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 56, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 236, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 416, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 596, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 776, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 956, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
EndFunc ;==>_newEdit