>TYPE   	D
>NAME   	sevebytv.d
>CODE   	sevebytv.cod
>BY     	@(#)$Author: Helene $
>DATE   	@(#)$Date: 06-10-26 9:21 $
>VERSION	@(#)$Revision: 3 $
>ID     	24011

>FILES ROWS 0
#type id  name        dbtype mode autoload r0 r1 r2 r3 r4 r5 comment

>TEXTINFO ROWS 13 SIZE 319
#id    value    flags    text
IDL_100  100  -  Kan inte hitta raden i listkontrollen
IDL_101  101  -  Fel vid selektering av rad %1
IDL_102  102  -  Ny variantkod måste anges
IDL_103  103  -  Kan inte hitta variant. Ec=%1
IDL_104  104  -  Radera %1
IDL_105  105  -  Dimension %1 finns inte
IDL_106  106  -  Variant %1 finns inte
IDL_107  107  -  Re&gister
IDL_108  108  -  Växla
IDL_110  110  -  Byter varianter
IDL_111  111  -  Variantkod finns redan
IDL_112  112  -  Finns aktuell backup på databasen
IDL_113  113  -  Byte genomfört. Gå in i rutin 876 och kör sevebyt


>STACK ROWS 230 SIZE 3000

>FONT ROWS 9
#id Hgt Wth Esc Ori Wgt Ita  Ul Sth Chs Opr Clp Qua Pch Name
1    -9   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
2   -11   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
3   -11   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
4   -11   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
5   -13   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
6   -13   0   0   0 400   1  0   0   0   0   0   0   0 "Arial"
7   -13   0   0   0 700   0  0   0   0   0   0   0   0 "Arial"
8   -16   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"
9   -19   0   0   0 400   0  0   0   0   0   0   0   0 "Arial"


>COLOR ROWS 16
#id color	comment
1   0x0        	""
2   0x808080   	""
3   0x80       	""
4   0x8080     	""
5   0x8000     	""
6   0x808000   	""
7   0x800000   	""
8   0x800080   	""
9   0xffffff   	""
A   0xc0c0c0   	""
B   0xff       	""
C   0xffff     	""
D   0xff00     	""
E   0xffff00   	""
F   0xff0000   	""
G   0xff00ff   	""


>BRUSH ROWS 5 SIZE 100
#id type	text
1   0	0xc0c0c0
2   1	pattern
3   2	tegel.bmp
5   4	0xff
6   5	0x0


>APPEVENTS ROWS 0
#id Eventname	ParamList


>WINDOW ROWS 1
#id       x     y    cy    cx sp1	sp2	Bitmap	font	size	caption
5511     20    90   250   358 SBL	-	-	"-"	  0	"Byte av variantkod"

>FORM MAIN ROWS 8 SIZE 91 "100 Main"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   621    0    4   16  320 -	PhmZ	-	win4	-	""
GR   101   16    4   90  292 -	pWZ	-	lcTable	-	""
TB   124  108    4   94  292 -	PZw	-	tab1	-	"Variant"
B3    12  206    4   15   50 -	TPw	-	pbSave	-	"save.bmp,&Spara"
B3  2210  206   58   15   50 -	xTPhw	-	pbNew	-	"new.bmp,&Ny"
B3   137  206  112   15   50 -	xTPhw	-	pbDelete	-	"del.bmp,&Ta bort"
B3     2  206  300   15   56 -	xTPhwz	-	pbCancel	-	"exit.bmp,St&äng"
B3 24101   16  300   15   56 -	QP	-	pbChange	-	"ok.bmp, Byt &varkod"

>FORM tab1 ROWS 3 SIZE 3 "623 - tab1"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
WW   627   12    2   15  286 -	Ph	-	win5	-	""
WW  2213   36    2   54  286 -	HP	-	win6	-	""
FR   630   30    2    1  286 -	pZ	-	-	-	""

>FORMFILES tab1 ROWS 0
#Id	sp
>FORM win4 ROWS 23 SIZE 23 "Tool"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
FR  1990    0    0   13    1 -	Hp	-	-	-	""
FR  1991    0    0   13    1 -	Hp	-	-	-	""
FR  1992    0    0   13    1 -	Hp	-	-	-	""
FR  1993    0    0   13    1 -	Hp	-	-	-	""
FR  1994    0    0   13    1 -	Hp	-	-	-	""
FR  1995    0    0   13    1 -	Hp	-	-	-	""
FR  1996    0    0   13    1 -	Hp	-	-	-	""
B3  2000    0    8   13   15 -	STHpfF	-	pbTool	-	""
B3  2001    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2002    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2003    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2004    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2005    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2006    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2007    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2008    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2009    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2010    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2011    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2012    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2013    0    0   13   15 -	STHpfF	-	pbTool	-	""
B3  2014    0    0   13   15 -	STHpfF	-	pbTool	-	""
FU  4071    0    0   15  320 -	pZ	-	-	-	""

>FORM win5 ROWS 5 SIZE 34 "head"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D    103    2   54   13   90 -	PU	-	edCode	#1701	""
D  24021    2  220   13   60 -	PU	-	edVariantcode	#1702	""
T  24022    4  164   11   54 -	p	-	-	-	"Variantkod:"
T    110    4    4   11   48 -	p	-	-	-	"Dimension:"
B3 24100    2  146   13   15 -	xTpfF	-	pbCode	-	"seek.bmp"

>FORMFILES win5 ROWS 0
#Id	sp
>FORM lcTable ROWS 3 SIZE 35 ""
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
T  24097    2    4   11   45 -	Hp	-	-	#1701	"Dimension"
T  24098    0   50   11   50 -	Hp	-	-	#1702	"Variantkod"
T  24099    0  100   11   65 -	Hp	-	-	#1703	"Ny variantkod"

>FORMFILES lcTable ROWS 0
#Id	sp
>FORM win6 ROWS 4 SIZE 28 "win6"
#T   Id    R    C   cy   cx sp	sp1	sp2	Id	Label
D  24103    2   54   13   88 -	pO	-	-	#1795	""
D  24095   16   54   13   88 -	PU	-	edNewVariantCode	#1703	""
T  24096   18    4   11   46 -	p	-	txPrice	-	"Ny variantkod:"
T  24104    4    4   11   46 -	p	-	-	-	"Benämning:"

>FORMFILES win6 ROWS 0
#Id	sp
>SOURCE
