Beiträge von stinger2k

stinger2k

Bei Abänderung von $asplit zu $aItem passiert folgendes:

[Blockierte Grafik: http://www.autoit.de/index.php?page=Attachment&attachmentID=8430&h=990e62ad10fad6988d511dc8a63cf6204593afee]

stinger2k

habs grad mit @TAB versucht trägt es mir zwar ein jedoch nur so: (in nur einer zeile)
auch mit Trennung von @TAB &@CRLF funktioniert es nicht...

[Blockierte Grafik: http://www.autoit.de/index.php?page=Attachment&attachmentID=8428&h=7e5e8d74adc2cdf3bf226a1ab5876e5ea1b4dff9]

Gruß Stinger

stinger2k

Der Ansatz ist gut, jedoch funktioniert die func auch nicht in einer mehrspaltigen listview, habe die func mal 1:1 übertragen und beim Versuch die items zu kopieren und
wieder einzufügen, übernimmt er zwar die Formatierung mit den Tab Abständen in Excel,Editor, Word etc. jedoch nicht in meiner ListView.

Hier mal ein Screenshot: [Blockierte Grafik: http://www.autoit.de/index.php?page=Attachment&attachmentID=8427&h=91c38911551ad9ad04649242997321731d592a20]

Die Func zum einfügen:

[autoit]

Opt("GUIDataSeparatorChar", @TAB)
$pasteindex = _GUICtrlListView_GetSelectedIndices($Liste, False)
_GUiCtrlListView_INsertRow ($Liste, Clipget(),$pasteindex)
Sleep(150)
Opt("GUIDataSeparatorChar", Default)
EndFunc ;==>strg_v

[/autoit]

bitte helft mir...
THX @m-obi

stinger2k

Hallo Leute!

Suche eine Möglichkeit kopierte Items im Format "Pos|1|2|3|4|5" in eine mehrspaltige Listview einzutragen.

[autoit]

GUICtrlCreateListViewItem ()

[/autoit]

funktioniert nicht da es erstens nur ans ende der liste hinzufügt und immer nur eine Zeile

[autoit]

_GUICtrlListView_InsertItem ()

[/autoit]

fügt zwar mehrere Items im Format wie oben ein jedoch nicht in eine mehrspaltige.

[autoit]

GUICtrlSetData

[/autoit]

gibt auch mehrere Items aus jedoch nicht direkt in die zeile einer ListView.
So langsam fällt mir sonst keine Funktion ein mit der dies zu bewerkstelligen wäre. Vielleicht könnt Ihr mir dabei helfen, dies zu erreichen...

stinger2k

Danke an euch alle...

ich konnte damit schon gut arbeiten. +
zum Vorschlag die GUI´s schon am anfang zu erstellen und nur mehr zu hiden oder zu zeigen:
ich möchte nicht unnötig ressourcen verbrauchen, da die darauffolgenden Fenster wahrscheinlich nur selten verwendet werden.

autoBert
Deinen Vorschlag fand ich am idealsten und am verständlichsten...

Danke nochmal an euch alle....

stinger2k

Ich brauche bei diesem Problem mal wieder eure Hilfe,

und zwar habe ich eine Gui worin ich auf buttondruck eine 2. erstelle.
Soweit so gut, jedoch wenn ich von der 2. erstellten rüber in die 1. gehe und diese enable springt die vorgesehene While Schleife für die erste nicht an. (Beide Gui´s @SW_SHOW)
Mit "ExitLoop" wäre dies natürlich leicht zu erreichen, jedoch fehlt mir ein Weg wie ich dann beim Wechsel in die 2. Gui die dortige Schleife wieder aktiviere.

Ich hoffe ich konnte euch mein Problem gut beschreiben. (ahja... Ich habe auch mit SEuBo´s Hilfe versucht dies über GuiGetMsg(1) zu lösen jedoch funktioniert diese Lösung nur
wenn ein Fenster @SW_HIDE ist, ich möchte jedoch mit beiden zur selben Zeit, im selben Script arbeiten um mir den Weg der Variablenübergabe über eine "ini" zu ersparen. :wacko:

Danke für eure Hilfe.....

:edit

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$gui1 = GUICreate('HauptGUI', 500, 300, -1, -1)
$button1 = GUICtrlCreateButton('2. GUI', 20, 20, 100, 21)
GUISetState (@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1
$msg = GUIGetMsg()
Switch $msg

[/autoit] [autoit][/autoit] [autoit]

Case $button1
profilfinder()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func profilfinder()

[/autoit] [autoit][/autoit] [autoit]

$Form1_1 = GUICreate("Profilsuche", 974, 718, -1, -1, BitOR($WS_SIZEBOX, $WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_GROUP, $WS_CLIPSIBLINGS, $ES_AUTOHSCROLL, $ES_AUTOVSCROLL))
$MenuItem4 = GUICtrlCreateMenu("&Datei")
$MenuItem3 = GUICtrlCreateMenu("&Bearbeiten")
$MenuItem2 = GUICtrlCreateMenu("&Optionen")
$MenuItem1 = GUICtrlCreateMenu("&Hilfe")
GUISetIcon("N:\neu.exe")
GUISetBkColor(0xFFFFFF)
GUICtrlSetResizing(-1, $GUI_DOCKALL)

[/autoit] [autoit][/autoit] [autoit]

$Text_Progname = GUICtrlCreateLabel("Profilsuche", 282, 48, 314, 30)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
GUICtrlSetFont(-1, 16, 800, 0, "MS Reference Sans Serif")
GUICtrlSetColor(-1, 0x000080)

[/autoit] [autoit][/autoit] [autoit]

$Pic1 = GUICtrlCreatePic(@ScriptDir & "\ESCO_2.l", 39, 39, 121, 40, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetResizing(-1, $GUI_DOCKALL)

[/autoit] [autoit][/autoit] [autoit]

$Pic2 = GUICtrlCreatePic("N:\profil.bmp", 3, 153, 956, 502, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetResizing(-1, $GUI_DOCKALL)

[/autoit] [autoit][/autoit] [autoit]

$Label1 = GUICtrlCreateLabel("Geben Sie bitte die benötigten Maße an:", 12, 129, 195, 17)
GUICtrlSetResizing(-1, $GUI_DOCKALL)

[/autoit] [autoit][/autoit] [autoit]

$Input1 = GUICtrlCreateInput("Flügel BT", 6, 327, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input2 = GUICtrlCreateInput("Überschl. Breite", 519, 591, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input3 = GUICtrlCreateInput("Bl.R. Freimaß", 642, 591, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input4 = GUICtrlCreateInput("Überschl.Überd.", 564, 555, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input5 = GUICtrlCreateInput("Kammermaß", 516, 393, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input6 = GUICtrlCreateInput("Rahmen BT", 834, 306, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input7 = GUICtrlCreateInput("Beschlagachse", 879, 420, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input8 = GUICtrlCreateInput("Falzluft", 516, 360, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Input9 = GUICtrlCreateInput("Überschl.höhe", 627, 471, 85, 21, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER, $WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Profil_finden = GUICtrlCreateButton("Profil finden", 21, 585, 99, 25, $WS_GROUP)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 129, 585, 99, 25, $WS_GROUP)
GUICtrlSetResizing(-1, $GUI_DOCKALL)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1
$nmsg = GUIGetMsg()
Switch $nmsg
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

[/autoit] [autoit][/autoit] [autoit]

Case $Input1
Case $Input2
Case $Input3
Case $Input4
Case $Input5
Case $Input6
Case $Input7
Case $Input8
Case $Input9
Case $Profil_finden
;~ profilliste()
Case $Abbrechen
EndSwitch

[/autoit] [autoit][/autoit] [autoit]

WEnd
EndFunc ;==>profilfinder

[/autoit]

stinger2k

Sieh mal in der Hilfe unter Windows-NAchrichtencodes nach, vielleicht hilft dir das weiter?

stinger2k

Wieder was dazugelernt auch bilder kann man disablen.... :)grübel, grübel

Danke für deine Hilfe, weißt du auch wie ich es verhindern kann das beim vergrößern oder verkleinern des Fensters die input´s auf ihrer zugehörigen stelle bleiben? (sich also nicht resizen)

stinger2k

Oh entschuldige...

Hier das Pic Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

stinger2k

Wie kann ich es machen das die controls mit der maus anwählbar bleiben ?

Spoiler anzeigen

[autoit]

profilfinder()
func profilfinder ()
$Form1_1 = GUICreate("GUI", 965, 759, 284, 122, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_MAXIMIZE,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_TABSTOP,$WS_HSCROLL,$WS_VSCROLL,$WS_BORDER,$WS_CLIPSIBLINGS))
$MenuItem4 = GUICtrlCreateMenu("&Datei")
$MenuItem3 = GUICtrlCreateMenu("&Bearbeiten")
$MenuItem2 = GUICtrlCreateMenu("&Optionen")
$MenuItem1 = GUICtrlCreateMenu("&Hilfe")
GUISetIcon("N:\neu.exe")
GUISetBkColor(0xFFFFFF)
$Text_Progname = GUICtrlCreateLabel("Profilsuche", 282, 48, 314, 30)
GUICtrlSetFont(-1, 16, 800, 0, "MS Reference Sans Serif")
GUICtrlSetColor(-1, 0x000080)
$Pic2 = GUICtrlSetImage("C:\Users\User\Pictures\Roto_übersicht2.bmp", 3, 153, 956, 502, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Label1 = GUICtrlCreateLabel("Geben Sie bitte die benötigten Maße an:", 12, 129, 195, 17)
$Input1 = GUICtrlCreateInput("Flügel BT", 6, 327, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input2 = GUICtrlCreateInput("Überschl. Breite", 519, 591, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input3 = GUICtrlCreateInput("Bl.R. Freimaß", 642, 591, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input4 = GUICtrlCreateInput("Überschl. Überd.", 564, 555, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input5 = GUICtrlCreateInput("Kammermaß", 516, 393, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input6 = GUICtrlCreateInput("Rahmen BT", 834, 306, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input7 = GUICtrlCreateInput("Beschlagachse", 879, 420, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input8 = GUICtrlCreateInput("Falzluft", 516, 360, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Input9 = GUICtrlCreateInput("Überschl.höhe", 627, 471, 85, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL,$ES_NUMBER,$WS_BORDER))
GUICtrlSetBkColor(-1, 0xFFFF00)
$Profil_finden = GUICtrlCreateButton("Profil finden", 21, 585, 99, 25, $WS_GROUP)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 129, 585, 99, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
GUIDelete()
GUISetState (@SW_ENABLE,$Form1)
ExitLoop
Case $Input1
Case $Input2
Case $Input3
Case $Input4
Case $Input5
Case $Input6
Case $Input7
Case $Input8
Case $Input9
Case $Profil_finden
profilliste()

[/autoit] [autoit][/autoit] [autoit]

Case $Abbrechen
EndSwitch
WEnd
EndFunc

[/autoit]

stinger2k

Mit den Windows Boardmitteln über "cmd" Befehl "comp x:*.* y:*.*"
dann über Stdout ergebniss abrufen...?

stinger2k

Danke RAUPI

hatte also $IMAGE_ICON anstatt $IMAGE_BITMAP...

weißt du vielleicht auch wie ich das mit transparenten hintergrund hinkriegen könnte?
Also als .ico oder .png einbinden?

stinger2k

habe nur eines zum testen...

folder.bmp
folder.png

stinger2k

Wie kann ich icons im Hauptmenü anzeigen lassen?

mein code: --bei dem es nicht funktioniert

Spoiler anzeigen

[autoit]

$Form1 = GUICreate("Entwurf", @DesktopWidth, @DesktopHeight, -1, -1, BitOR($WS_MAXIMIZE, $WS_SIZEBOX, $WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_GROUP, $WS_CLIPSIBLINGS, $ES_AUTOHSCROLL, $ES_AUTOVSCROLL))
$Datei = GUICtrlCreateMenu("&Datei")
$Bearbeiten = GUICtrlCreateMenu("&Bearbeiten")
$Optionen = GUICtrlCreateMenu("&Optionen")
$Hilfe = GUICtrlCreateMenu("&Hilfe")

[/autoit] [autoit][/autoit] [autoit]

$oeffnen = GUICtrlCreateMenuItem("&Öffnen", $Datei)
$menuneu = GUICtrlCreateMenuItem("&Neu", $Datei)
$menudruck = GUICtrlCreateMenuItem("&Drucken", $Datei)
$menusave = GUICtrlCreateMenuItem("&Speichern", $Datei)

[/autoit] [autoit][/autoit] [autoit]

$hBmpCreate = _WinAPI_LoadImage(0, "S:\folder.bmp", $IMAGE_ICON, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
_GUICtrlMenu_SetItemBitmaps(GUICtrlGetHandle ($Datei), $oeffnen, $hBmpCreate, False)

[/autoit] [autoit][/autoit] [autoit]

$menusearch = GUICtrlCreateMenuItem("Suchen", $Bearbeiten)
$menucopy = GUICtrlCreateMenuItem("Kopieren", $Bearbeiten)
$menutoexcel = GUICtrlCreateMenuItem("in Excel bearbeiten", $Bearbeiten)
$menusend = GUICtrlCreateMenuItem("als E-Mail versenden", $Bearbeiten)

[/autoit] [autoit][/autoit] [autoit]

$menueinstellungen = GUICtrlCreateMenuItem("Firmendaten aktualisieren", $Optionen)
$kommission = GUICtrlCreateMenuItem("Kommission hinzufügen", $Optionen)

[/autoit] [autoit][/autoit] [autoit]

$menuinfo = GUICtrlCreateMenuItem("Über...", $Hilfe)

[/autoit] [autoit][/autoit] [autoit]

GUISetBkColor(0xFFFFFF)

[/autoit] [autoit][/autoit] [autoit]

GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit]

hier jedoch schon: ---- aus dem englischen forum

Spoiler anzeigen

[autoit]

#include <WinAPI.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
#include <WindowsConstants.au3>
#include <GUIConstants.au3>
#include <GuiConstantsEx.au3>
#include <StaticConstants.au3>
#include <EditConstants.au3>
#include <GUIScrollBars.au3>
#include <ScrollBarConstants.au3>
#include <Constants.au3>
#include <Date.au3>
#include <GuiMenu.au3>

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Local $iGuiWidth = 1400
Local $iGuiHeight = 900
Local $hMenuFile, $hMenuLibrary, $hMenuEdit, $hMenuView, $hMenuOptions, $hMenuHelp, $hMainMenu
Local Enum $idFileNewSeries = 1000, $idFileSeparator1, $idFileAddFile, $idFileAddFolder, $idLibraryBackup, $idLibraryOrganize, $idLibraryExport, $idFileSeparator2, $idFileUpdate, $idFileSeparator3, $idFileExit
Local Enum $idEditUndo = 2000, $idEditSeparator1, $idEditCut, $idEditCopy, $idEditPaste, $idEditDelete, $idEditSelectAll, $idEditSelectNone
Local Enum $idViewAsList = 3000, $idViewAsBanners, $idViewSeparator1, $idViewOptions
Local Enum $idOptionsPreferences = 4000
Local Enum $idHelpHelp = 5000, $idHelpIntro, $idHelpSeparator1, $idHelpAbout
Local $hBmpCreate

[/autoit] [autoit][/autoit] [autoit]

$hGui = GUICreate("TEST APP", $iGuiWidth, $iGuiHeight, (@DesktopWidth-$iGuiWidth)/2, (@DesktopHeight-$iGuiHeight)/2, BitOR($WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetFont(8, 400, 0, "Verdana")

[/autoit] [autoit][/autoit] [autoit]

;icons
;---File
$hBmpCreate = _WinAPI_LoadImage(0, "S:\folder.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpNewVideo = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\New Video.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpAddFolder = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Add Folder.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpCD = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\CD.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpNotes = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Notes.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpExport = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Export.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpUpdate = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Update.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpExit = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Exit.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
;---Edit
$hBmpUndo = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Undo.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpCut = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Cut.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpCopy = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Copy.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpPaste = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Paste.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpDelete = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Delete.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpSelectAll = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Select All.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpSelectNone = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Select None.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
;---Preferences
$hBmpOptions = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Options.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
;---Help
$hBmpHelp = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Help.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpIntro = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\Intro.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))
$hBmpAbout = _WinAPI_LoadImage(0, @ScriptDir & "\_Resources\icons\About.bmp", $IMAGE_BITMAP, 16, 16, BitOR($LR_LOADTRANSPARENT,$LR_LOADFROMFILE))

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

;File Menu
$hMenuFile = _GUICtrlMenu_CreateMenu ()
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 0, "New Series", $idFileNewSeries)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 1, "", $idFileSeparator1)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 2, "Add File to Library ...", $idFileAddFile)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 3, "Add Folder to Library ...", $idFileAddFolder)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 5, "", $idFileSeparator2)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 6, "Update Info from Web", $idFileUpdate)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 7, "", $idFileSeparator3)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 8, "Exit", $idFileExit)
;---Images
_GUICtrlMenu_SetItemBmp($hMenuFile, $idFileNewSeries, $hBmpCreate, False)
_GUICtrlMenu_SetItemBmp($hMenuFile, $idFileAddFile, $hBmpNewVideo, False)
_GUICtrlMenu_SetItemBmp($hMenuFile, $idFileAddFolder, $hBmpAddFolder, False)
_GUICtrlMenu_SetItemBmp($hMenuFile, $idFileUpdate, $hBmpUpdate, False)
_GUICtrlMenu_SetItemBmp($hMenuFile, $idFileExit, $hBmpExit, False)

[/autoit] [autoit][/autoit] [autoit]

;Library Menu
$hMenuLibrary = _GUICtrlMenu_CreateMenu ()
_GUICtrlMenu_InsertMenuItem ($hMenuLibrary, 0, "Backup to Disc ...", $idLibraryBackup)
_GUICtrlMenu_InsertMenuItem ($hMenuLibrary, 1, "Organize Library ...", $idLibraryOrganize)
_GUICtrlMenu_InsertMenuItem ($hMenuLibrary, 2, "Export Library ...", $idLibraryExport)
;---Images
_GUICtrlMenu_SetItemBmp($hMenuLibrary, $idLibraryBackup, $hBmpCD, False)
_GUICtrlMenu_SetItemBmp($hMenuLibrary, $idLibraryOrganize, $hBmpNotes, False)
_GUICtrlMenu_SetItemBmp($hMenuLibrary, $idLibraryExport, $hBmpExport, False)

[/autoit] [autoit][/autoit] [autoit]

;Edit Menu
$hMenuEdit = _GUICtrlMenu_CreateMenu ()
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 0, "Undo", $idEditUndo)
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 1, "", $idEditSeparator1)
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 2, "Cut", $idEditCut)
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 3, "Copy", $idEditCopy)
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 4, "Paste", $idEditPaste)
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 5, "Delete", $idEditDelete)
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 6, "Select All", $idEditSelectAll)
_GUICtrlMenu_InsertMenuItem ($hMenuEdit, 7, "Select None", $idEditSelectNone)
;---Images
_GUICtrlMenu_SetItemBmp($hMenuEdit, $idEditUndo, $hBmpUndo, False)
_GUICtrlMenu_SetItemBmp($hMenuEdit, $idEditCut, $hBmpCut, False)
_GUICtrlMenu_SetItemBmp($hMenuEdit, $idEditCopy, $hBmpCopy, False)
_GUICtrlMenu_SetItemBmp($hMenuEdit, $idEditPaste, $hBmpPaste, False)
_GUICtrlMenu_SetItemBmp($hMenuEdit, $idEditDelete, $hBmpDelete, False)
_GUICtrlMenu_SetItemBmp($hMenuEdit, $idEditSelectAll, $hBmpSelectAll, False)
_GUICtrlMenu_SetItemBmp($hMenuEdit, $idEditSelectNone, $hBmpSelectNone, False)

[/autoit] [autoit][/autoit] [autoit]

;View Menu
$hMenuView = _GUICtrlMenu_CreateMenu ()
_GUICtrlMenu_InsertMenuItem ($hMenuView, 0, "as List", $idViewAsList)
_GUICtrlMenu_InsertMenuItem ($hMenuView, 1, "as Banners", $idViewAsBanners)
_GUICtrlMenu_InsertMenuItem ($hMenuView, 2, "", $idViewSeparator1)
_GUICtrlMenu_InsertMenuItem ($hMenuView, 3, "View Options ...", $idViewOptions)
;---Images
_GUICtrlMenu_SetItemBmp($hMenuView, $idViewOptions, $hBmpOptions, False)

[/autoit] [autoit][/autoit] [autoit]

;Options Menu
$hMenuOptions = _GUICtrlMenu_CreateMenu ()
_GUICtrlMenu_InsertMenuItem ($hMenuOptions, 0, "Preferences", $idOptionsPreferences)
;---Images
_GUICtrlMenu_SetItemBmp($hMenuOptions, $idOptionsPreferences, $hBmpOptions, False)

[/autoit] [autoit][/autoit] [autoit]

;Help Menu
$hMenuHelp = _GUICtrlMenu_CreateMenu ()
_GUICtrlMenu_InsertMenuItem ($hMenuHelp, 0, "TV Squirrel Help", $idHelpHelp)
_GUICtrlMenu_InsertMenuItem ($hMenuHelp, 1, "Indroduction", $idHelpIntro)
_GUICtrlMenu_InsertMenuItem ($hMenuHelp, 2, "", $idHelpSeparator1)
_GUICtrlMenu_InsertMenuItem ($hMenuHelp, 3, "About TV Squirrel", $idHelpAbout)
;---Images
_GUICtrlMenu_SetItemBmp($hMenuHelp, $idHelpHelp, $hBmpHelp, False)
_GUICtrlMenu_SetItemBmp($hMenuHelp, $idHelpIntro, $hBmpIntro, False)
_GUICtrlMenu_SetItemBmp($hMenuHelp, $idHelpAbout, $hBmpAbout, False)

[/autoit] [autoit][/autoit] [autoit]

; Create Main menu
$hMainMenu = _GUICtrlMenu_CreateMenu ()
_GUICtrlMenu_InsertMenuItem ($hMainMenu, 0, "File", 0, $hMenuFile)
_GUICtrlMenu_InsertMenuItem ($hMenuFile, 4, "Library", 0, $hMenuLibrary)
_GUICtrlMenu_InsertMenuItem ($hMainMenu, 2, "Edit", 0, $hMenuEdit)
_GUICtrlMenu_InsertMenuItem ($hMainMenu, 3, "View", 0, $hMenuView)
_GUICtrlMenu_InsertMenuItem ($hMainMenu, 4, "Options", 0, $hMenuOptions)
_GUICtrlMenu_InsertMenuItem ($hMainMenu, 5, "Help", 0, $hMenuHelp)

[/autoit] [autoit][/autoit] [autoit]

; Set window menu
_GUICtrlMenu_SetMenu ($hGUI, $hMainMenu)

[/autoit] [autoit][/autoit] [autoit]

$hBannerBg = GUICtrlCreatePic(@ScriptDir & "\_Resources\MainTopBg.jpg", 0, 0, $iGuiWidth, 100, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlSetResizing(-1, $GUI_DOCKTOP+$GUI_DOCKHCENTER+$GUI_DOCKHEIGHT)
$hBgBottom = GUICtrlCreatePic(@ScriptDir & "\_Resources\MainBotBg.jpg", 0, $iGuiHeight-50, $iGuiWidth, 50, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlSetResizing(-1, $GUI_DOCKBOTTOM+$GUI_DOCKHCENTER+$GUI_DOCKHEIGHT)

[/autoit] [autoit][/autoit] [autoit]

GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit]

Bitte um Hilfestellung...

stinger2k

Danke an alle die mir auch im vorigen Post geholfen haben!
Ich hab nun eine fertige func die mir die items so in die Zwischenablage puttet das sie genauso in eine txt.datei oder eben excel kompatibel rauskopiert werden kann.

Danke auch @ Autobert:
Hatte das vorige Post nicht mehr in Errinnerung da ich nur mehr die func von Bugfix in diesem Post im Kopf hatte, mit welcher ich meine excel tabelle per button füllen kann.

Nun hier die fertige func:

[autoit]

Func copy()
$array = _GUICtrlListView_GetSelectedIndices($Liste, True)
$Arrayitem_text = ""
For $i = 1 To $array[0]
$Arrayitem_text &= _GUICtrlListView_GetItemTextString($Liste, $array[$i]) & @CRLF
$formatted_array=StringReplace($Arrayitem_text, "|", @TAB) & @CRLF
Next
ClipPut($formatted_array & @CRLF)
EndFunc

[/autoit]

mfg Stinger

stinger2k

Hallo Leute,
komme mal wieder nicht weiter, wie bekomme ich es hin mehrere markierte items als einzelne strings in die zwischenablage zu kopieren?

um das momentan markierte item auszulesen hab ich das hier:

[autoit]

$curitemtext = _GUICtrlListView_GetItemTextString($Liste, -1)
$itemtext = StringReplace($curitemtext, "|", @TAB)
ClipPut($itemtext)

[/autoit]

brauche das @TAB um sie Excel konform einzufügen

stinger2k

Danke funzt...

Manchmal denkt man einfach zuviel...

stinger2k

Entschuldigt war keine Absicht.

Ich war der Meinung das der komplette Post gelöscht wird wenn ich auf "Beitrag in Papierkorb" klicke.

Tut mir leid....

stinger2k

Möchte beliebigen text in einem ctrl oder listview suchen und auch weitersuchen, komm jedoch jetzt nicht weiter hat vielleicht einer eine Idee?

Mein Code:

Spoiler anzeigen

[autoit]

Func search()
#Region ### START Koda GUI section ### Form=
$Form = GUICreate("Suchen", 400, 116, 294, 142,Default,Default,$Form1)
GUISetIcon("C:\Windows\System32\shell32.dll")
GUISetBkColor(0xFFFFFF)
$searchinput = GUICtrlCreateInput("", 93, 12, 190, 21)
$Label1 = GUICtrlCreateLabel("Suchbegriff:", 15, 15, 61, 17)
$Label2 = GUICtrlCreateLabel("", 12, 45, 239, 17)
$okbutton = GUICtrlCreateButton("OK", 309, 12, 81, 25, $WS_GROUP)
$weitersuchen = GUICtrlCreateButton("Weitersuchen", 309, 45, 81, 25, $WS_GROUP)
$abbrechenbutton = GUICtrlCreateButton("Abbrechen", 309, 78, 81, 25, $WS_GROUP)
$Radio1 = GUICtrlCreateRadio("von oben beginnen", 12, 69, 113, 17)
$Radio2 = GUICtrlCreateRadio("von unten beginnen", 12, 90, 113, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
Case $searchinput
IF _IsPressed ("0D") = 1 then
$find = _GUICtrlListView_FindInText($Liste, GUICtrlRead ($searchinput))
If $find < 0 Then
MsgBox(0, "Suchen", "Der gesuchte Begriff konnte nicht gefunden werden...")
else
$lastitem = _GUICtrlListView_ClickItem(GUICtrlGetHandle($Liste), $find)
EndIf
EndIf
GUICtrlSetState ($okbutton,$GUI_FOCUS)
Case $okbutton
$find = _GUICtrlListView_FindInText($Liste, GUICtrlRead ($searchinput))
If $find < 0 Then
MsgBox(0, "Suchen", "Der gesuchte Begriff konnte nicht gefunden werden...")
else
$lastitem = _GUICtrlListView_ClickItem(GUICtrlGetHandle($Liste), $find)
EndIf

[/autoit] [autoit][/autoit] [autoit]

Case $abbrechenbutton
GUIDelete()
ExitLoop

[/autoit] [autoit][/autoit] [autoit]

Case $weitersuchen
$find = _GUICtrlListView_FindInText($Liste, GUICtrlRead ($searchinput),$lastitem+1)
$lastitem = _GUICtrlListView_ClickItem(GUICtrlGetHandle($Liste), $find)
EndSwitch
WEnd
EndFunc

[/autoit]

stinger2k

Versucht mal nachdem noch auf schließen zu klicken damit die MsgBox kommt....

Beiträge von stinger2k

Mehrere Items in mehrspaltige ListView eintragen?

Mehrere Items in mehrspaltige ListView eintragen?

Mehrere Items in mehrspaltige ListView eintragen?

Mehrere Items in mehrspaltige ListView eintragen?

2 Gui´s vom selben script erstellen mit jeweiliger While Schleife... Hilfe...```

2 Gui´s vom selben script erstellen mit jeweiliger While Schleife... Hilfe...```

Laufwerk Typ erkennen ( ZIP-LW, eSATA-Stick, USB-Stick)

Inputs über background pic nicht anwählbar

Inputs über background pic nicht anwählbar

Inputs über background pic nicht anwählbar

zwei Verzeichnisse vergleichen

Icons in Hauptmenü ?

Icons in Hauptmenü ?

Icons in Hauptmenü ?

Wie mehrere ausgewählte items aus einer listview kopieren?

Wie mehrere ausgewählte items aus einer listview kopieren?

Suchfunktion mit unterstützung von "weitersuchen" wenn es mehrere items gibt?

GUI verschwindet....warum?

Suchfunktion mit unterstützung von "weitersuchen" wenn es mehrere items gibt?

GUI verschwindet....warum?