| |
| |
|
Jörg
Sellmeyer | Hello Frank,
with folgendem Code crashes the program ex, if I from the Menu whom point print auswähle and in the then emerging dialog on print or Cancel click 
CompileMarkSeparation $I Listview_Funktionen.inc
Proc Drucken
Parameters LV&
Declare txt$
txt$=Ausdruck 1
PrintListview(LV&,%hwnd,%hinstance,80,120,200,120,200,3,3,Addr(txt$),0,65)
EndProc
Declare hDll&,LV&,hFont&
Window 10,10 - 660,560
hfont& = Create(Font,Arial,18,0,0,0,0)
PopUp Programm
AppendMenu 100,&drucken
Separator
Appendmenu 101,be&enden
hDll&=UseDll(Listview.dll)
InitMessages(%hwnd)
LV&=CreateListView(%hwnd,%hinstance,-1,$FFFFFF,-1,$21)
SetFont LV&,hFont&
EnableDragDrop(LV&,5)
Declare Text$
Text$=Nr;Test;Test-Test;Tester;Tester;Test;Test
CsvToHeader(LV&,Addr(Text$),0)
Hier bei Version 2.0 SetColumnsFromMem verwenden
SetColumnsFromMem(LV&,Addr(Text$),0)
SetColumnWidth(LV&,0,40)
SetColumnWidth(LV&,1,190)
SetColumnWidth(LV&,2,150)
SetColumnWidth(LV&,3,86)
SetColumnAlignment(LV&,0,1)
SetColumnAlignment(LV&,5,1)
Setitem(LV&,01,Test 1)
Setitem(LV&,02,Test 2)
Setitem(LV&,03,Test 3)
Setitem(LV&,04,Test 4)
ShowListView(LV&,10,10,WIDTH(%hwnd) - 20,HEIGHT(%hwnd) - 20)
While 1
WaitInput
If %menuitem = 101
Break
ElseIf %menuitem = 100
Drucken(LV&)
EndIf
EndWhile
CloseMessages(%hwnd) _ONCE
DeleteObject LV&
DeleteObject hFont&
the happened to the Version 2.1!! with the middle-aged Version functions it. I seh already, I must still The old first again use. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 09/23/07 ▲ |
|
| |
|
|
Frank
Abbing | | you have Yes The Betaversion. well I sehs me on. |
|
| |
| |
| |
|
|
H.Brill | Hello Frank,
there I had latest week still right, as i you a Mail moreover sent.
thanks on Jörg. now having we at least 2 informations Screen memory.
Have me latest week NEN wolf sought and to that Schluß again The old
Version using.
Frank : Perhaps haste too involuntary something on the Druckroutine changed.
Something like is Yes quick happens. think there ans Delete one Parameters,
the then later again among other things names auftaucht or. again-
gefügt becomes. |
|
| |
| Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | 09/23/07 ▲ |
|
| |
|
|
Frank
Abbing | Werd whom bow already find...  |
|
| |
| |
| |
|
|
H.Brill | Hi,
Jörg How see it with you from? by me becomes The Page yet printed, though
the program crashes. Perhaps helps Frank the a little bit moreover. |
|
| |
| Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | 09/24/07 ▲ |
|
| |
|
|
Jörg
Sellmeyer | | Yes, had I forget, To allude. The pressure yourself functions correct! |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 09/24/07 ▲ |
|
| |
|
|
Frank
Abbing | | the helps. then can I whom bow rather lokalisieren. |
|
| |
| |
| |
|
(494)
Deutsch
English
Français
Español
Italia