| |
| |
|
Jörg
Sellmeyer | Hallo Rolf,
Wenn ich ein Treeview-Control erstelle, bricht das Profanprogramm mit der Meldung ab:
Variable doppelt declariert Treeview& in Zeile 2 TREEVIEW.INC
Ich sehe allerdings keine zweite Deklaration. Kann das mit der Unit zusammenhängen?
Gruß
Jörg |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 03.12.2006 ▲ |
|
| |
|
|
Rolf
Koch | SH****T  ´
Das ist ganz schlimm die letzte Zeit, seit XProfan10.
Jetzt fängt es an, das ich mich mit den kleinsten Zeichen in 30000 Zeilen auseinandersetzen muss *würg*
Auch hier kuck ich mal 
Nachtrag: Bei mir kommt die Meldung nicht?
Ich erstelle ein Treeview und alles in Ordnung
OCH MANNO! Ich habe die vorletzte XProfanversion in Roc eingestellt gehabt.
Roland, wie umgehe ich die extreme Überprüfung von doppelten Variablen? |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Ich sach ja: Ich kann auch keinen Grund dafür entdecken 
Hier ist der Quelltext:
KompilierenMarkierenSeparieren $P+
SET(ERRORLEVEL,0)
********************** HINWEISE ********************************
CODE ERZEUGT MIT ROKOS OBJECT CREATOR 4.5b
DATUM 03.12.2006 um 18:55 Uhr
VERWENDETE PROFANVERSION IST 10.0-NT XPROFAN
CODE ERSTELLT UNTER WINDOWS XP
!!! Dieser Code wird von Roc immer neu erzeugt !!!
!!! Erst bearbeiten, wenn alle Objekte erzeugt wurden !!!
!!! Verändern Sie ggf. feste Pfade in variable Pfade !!!
DEF GETSYSCOLOR(1) !USER32,GetSysColor
$U C:PROFANTOOLSROCLIBTRV.PCU = TRV_ (Treeview Unit...)
$I C:PROFANTOOLSROCTEST_TV.INC TREEVIEW INCLUDE
WINDOWSTYLE 63
WINDOWTITLE Neues Fenster
WINDOW 22,20-640,500
SET(TRUECOLOR,1)
DECLARE ENDE%
CLS GETSYSCOLOR(15)
USEFONT MS Sans Serif,13,0,0,0,0
SETDIALOGFONT 1
Hier kann ggf. Ihr Menü hin
CREATETREEVIEW TREEVIEW ERSTELLEN
TREEVIEWITEMS ITEMS IN TREEVIEW EINFÜGEN
SETFOCUS(%HWND)
WHILENOT ENDE%
WAITINPUT
GET_TREEVIEW TREEVIEW ABFRAGE
If %KEY=2
ENDE%= 1
ELSEIF %KEY=4
ENDIF
ENDWHILE
IMAGELIST_DESTROY(IMAGELIST&)
KompilierenMarkierenSeparierenDECLARE TRVDLL$
DECLARE TREEVIEW&,IMAGELIST&
TRVDLL$= C:PROFANTOOLSROCROCICON.DLL
IMAGELIST&=IMAGELIST_CREATE(16,16,32,3,3) IMAGELIST ERZEUGEN
PROC CREATETREEVIEW
TRV_CREATETREEVIEW %HWND,0091,0105,0120,0120
TREEVIEW&=&(0)
REPAINT
ENDPROC
PROC TREEVIEWITEMS
TRV_SETTEXTCLR TREEVIEW&,RGB(0,0,0)
TRV_SETBACKCLR TREEVIEW&,RGB(255,255,255)
ENDPROC
PROC GET_TREEVIEW ABFRAGEN DER TREEVIEWITEMS
IF GETFOCUS(TREEVIEW&)
ENDIF
ENDPROC
Auch IMAGELIST& wird angemeckert. Ich kann mir nur vorstellen, daß Du in der Unit die Variablen schon deklariert hast. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03.12.2006 ▲ |
|
| |
|
|
 | | Tjah selber schuld *schadenfroh* hätteste mal gleich auf XPSE gehört ^^ |
|
| |
| |
| |
|
|
RGH | Und was passiert, wenn Du die Zeile Declare Treeview&, ImageList& einfach mal testweise wegläßt? Wenn die Variablen tatsächlich schon in der Unit deklariert werden, müßte es dann ja gehen.
Gruß
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 03.12.2006 ▲ |
|
| |
|
|
| Eh ne Schweinerei Variablen in Units ohne ?_ Vorzeichen zu deklarieren!   |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | | Genau, dann funktioniert es - hatte ich vergessen zu erwähnen! |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03.12.2006 ▲ |
|
| |
|
(911)
Deutsch
English
Français
Español
Italia