ÿ
TSTRULOOMFORM0LTPF0
TStruLoomFormStruLoomFormLeftĞTopzWidth}HeightV
ActiveControlPanel1Caption%VB Structure on Loom Type MaintenanceColor	clBtnFaceFont.CharsetDEFAULT_CHARSET
Font.ColorclBlackFont.Heightõ	Font.Name
MS Sans Serif
Font.StyleOldCreateOrder	PositionpoScreenCenterOnClose	FormCloseOnShowFormShow
PixelsPerInch`
TextHeight
TPanelPanel1LeftTopWidthuHeight)AlignalTopTabOrderTSpeedButtonPrintSpdBtnLeftXTopWidthHeightHintPrint this form
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ0?ÿÿÿÿÿÿÿˆˆˆˆˆˆ€wwwwwwwˆˆˆˆˆˆ€wwwwwwwÿÿÿÿÿÿÿÿ������€wwwwwwwøøøøøùğwwwwwww������€wwwwwwwwwwwww30ÿÿÿÿ337óÿÿ?330ğ337÷wss330ÿÿÿÿ337óÿ?ÿ330ğ337÷swws330ÿÿğ3337óÿ73330ğ�3337÷ss3330ÿÿ33337ÿÿw3333033337wws333	NumGlyphsParentShowHintShowHint	OnClickPrintSpdBtnClickTDBNavigatorDBNavigatorLeftTopWidthêHeight
DataSourceStruLoomSourceVisibleButtonsnbFirstnbPriornbNextnbLastnbInsertnbDeletenbEditnbPostnbCancelCtl3DParentCtl3DTabOrderTBitBtnCloseBitBtnLeftTopWidthAHeightTabOrderOnClickCloseBitBtnClickKindbkCloseTPanelPanel2LeftTop)WidthuHeight´AlignalTop
BevelInner	bvLoweredBorderWidthCaptionPanel2TabOrderTDBGridDBGrid1LeftTopWidthiHeight¨AlignalClientBorderStylebsNone
DataSourceStruLoomSourceTabOrderTitleFont.CharsetDEFAULT_CHARSETTitleFont.ColorclBlackTitleFont.HeightõTitleFont.Name
MS Sans SerifTitleFont.StyleTPanelPanel3LeftTopàWidthuHeight[AlignalBottom
BevelInner	bvLoweredBorderWidthTabOrderTLabelLabel1LeftTopWidth_Height
CaptionVB Structure DetailsTLabelLabel2Left¬TopWidthUHeight
CaptionLoomType DetailsTLabelLabel3LeftTop$WidthHeight
CaptionDescrTLabelLabel4Left¬Top$WidthHeight
CaptionNameTLabelLabel5Left¬Top<WidthHeight
CaptionShedTLabelLabel6LeftpTopWidth3Height
Caption
can run onTDBEditEditVBDescrLeft0Top WidthPHeightColorclSilver	DataFieldDESCR
DataSourceVBStruSourceReadOnly	TabOrderTDBEdit
EditLTNameLeftĞTop WidthPHeightColorclSilver	DataFieldNAME
DataSourceLoomTypeSourceReadOnly	TabOrderTDBEdit
EditLTShedLeftĞTop8WidthPHeightColorclSilver	DataFieldSHED
DataSourceLoomTypeSourceReadOnly	TabOrderTDataSourceStruLoomSourceDataSetStruLoomLeft—TopmTQueryVBStruQueryDatabaseNameVBStock
DataSourceStruLoomSourceSQL.Stringsselect descrfrom vbstruwhere vbstru=:vbstruLeft<Top¹	ParamDataDataTypeftStringNameVBSTRU	ParamType	ptUnknownTQuery
LoomTypeQueryDatabaseNameVBStock
DataSourceStruLoomSourceSQL.Stringsselect name,shed,width,maxcol
from loomtypewhere loomtype=:loomtypeLeftÌTopµ	ParamDataDataTypeftStringNameLOOMTYPE	ParamType	ptUnknownTDataSourceVBStruSourceDataSetVBStruQueryLeftXTop¹TDataSourceLoomTypeSourceDataSet
LoomTypeQueryLeftäTopµTTableStruLoomBeforeInsertStruLoomBeforeInsert
BeforeEditStruLoomBeforeEdit	AfterPostStruLoomAfterPostAfterCancelStruLoomAfterCancelBeforeDeleteStruLoomBeforeDeleteAfterDeleteStruLoomAfterDelete
OnDeleteErrorStruLoomDeleteErrorDatabaseNameVBStock	TableNameSTRULOOMLeftxTopqTStringFieldStruLoomVBSTRUDisplayLabel	StructureDisplayWidth	FieldNameVBSTRURequired	EditMask>Laa;0;_SizeTStringFieldStruLoomLOOMTYPEDisplayLabel	Loom TypeDisplayWidth		FieldNameLOOMTYPERequired	EditMask>L;0;_SizeTSmallintFieldStruLoomPICSPERMINDisplayLabelPics Per Min	FieldName
PICSPERMINTSmallintFieldStruLoomLOOMEFFDisplayLabel
Loom Eff %	FieldNameLOOMEFF