$PBExportHeader$w_resizedwsyntax.srw $PBExportComments$NEW! Weighted resize of a window and its objects. forward global type w_resizedwsyntax from w_main end type type ddplb_object from u_ddplb within w_resizedwsyntax end type type lb_attributes from u_lb within w_resizedwsyntax end type type mle_describe from u_mle within w_resizedwsyntax end type type mle_dotnotation from u_mle within w_resizedwsyntax end type type st_object from u_st within w_resizedwsyntax end type type st_describe from u_st within w_resizedwsyntax end type type st_dotnotation from u_st within w_resizedwsyntax end type type st_note from u_st within w_resizedwsyntax end type type gb_notes from u_gb within w_resizedwsyntax end type type st_attributes from u_st within w_resizedwsyntax end type end forward global type w_resizedwsyntax from w_main int X=5 int Y=4 int Width=2555 int Height=1292 boolean TitleBar=true string Title="PFC Example - Weighted Resize of a Window" ddplb_object ddplb_object lb_attributes lb_attributes mle_describe mle_describe mle_dotnotation mle_dotnotation st_object st_object st_describe st_describe st_dotnotation st_dotnotation st_note st_note gb_notes gb_notes st_attributes st_attributes end type global w_resizedwsyntax w_resizedwsyntax on w_resizedwsyntax.create int iCurrent call super::create this.ddplb_object=create ddplb_object this.lb_attributes=create lb_attributes this.mle_describe=create mle_describe this.mle_dotnotation=create mle_dotnotation this.st_object=create st_object this.st_describe=create st_describe this.st_dotnotation=create st_dotnotation this.st_note=create st_note this.gb_notes=create gb_notes this.st_attributes=create st_attributes iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.ddplb_object this.Control[iCurrent+2]=this.lb_attributes this.Control[iCurrent+3]=this.mle_describe this.Control[iCurrent+4]=this.mle_dotnotation this.Control[iCurrent+5]=this.st_object this.Control[iCurrent+6]=this.st_describe this.Control[iCurrent+7]=this.st_dotnotation this.Control[iCurrent+8]=this.st_note this.Control[iCurrent+9]=this.gb_notes this.Control[iCurrent+10]=this.st_attributes end on on w_resizedwsyntax.destroy call super::destroy destroy(this.ddplb_object) destroy(this.lb_attributes) destroy(this.mle_describe) destroy(this.mle_dotnotation) destroy(this.st_object) destroy(this.st_describe) destroy(this.st_dotnotation) destroy(this.st_note) destroy(this.gb_notes) destroy(this.st_attributes) end on event pfc_preopen;////////////////////////////////////////////////////////////////////////////// // // Event: // pfc_preopen // // Arguments: // None // // Returns: // None // // Description: // Start the Window Resize Service and register the window's controls. // ////////////////////////////////////////////////////////////////////////////// // Start the Window Resize service. of_SetResize(true) // Register the window's controls with the service. inv_resize.of_SetMinSize(1500, 1000) inv_resize.of_Register(lb_attributes, 0, 0, 100, 0) inv_resize.of_Register(gb_notes, 0, 0, 100, 0) inv_resize.of_Register(mle_describe, 0, 0, 100, 50) inv_resize.of_Register(st_dotnotation, 0, 50, 0, 0) inv_resize.of_Register(mle_dotnotation, 0, 50, 100, 50) end event type ddplb_object from u_ddplb within w_resizedwsyntax int X=32 int Y=104 int Width=969 int TabOrder=30 string Item[]={"DataWindow"} string PictureName[]={"DataWindow5!"} int ItemPictureIndex[]={1} end type event constructor;call super::constructor;////////////////////////////////////////////////////////////////////////////// // // Event: // constructor // // Description: // Display a value after creation. // ////////////////////////////////////////////////////////////////////////////// // // Revision History // // Version // 6.0 Initial version // ////////////////////////////////////////////////////////////////////////////// // /* * Open Source PowerBuilder Foundation Class Libraries * * Copyright (c) 2004-2005, All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted in accordance with the GNU Lesser General * Public License Version 2.1, February 1999 * * http://www.gnu.org/copyleft/lesser.html * * ==================================================================== * * This software consists of voluntary contributions made by many * individuals and was originally based on software copyright (c) * 1996-2004 Sybase, Inc. http://www.sybase.com. For more * information on the Open Source PowerBuilder Foundation Class * Libraries see http://pfc.codexchange.sybase.com */ // ////////////////////////////////////////////////////////////////////////////// SelectItem(1) end event type lb_attributes from u_lb within w_resizedwsyntax int X=1280 int Y=104 int Width=1211 int Height=372 int TabOrder=40 string Item[]={"Attributes",& "Band",& "Color",& "Column.Count",& "Crosstab.Columns",& "Crosstab.Rows",& "Crosstab.SourceNames",& "Crosstab.StaticMode"} end type type mle_describe from u_mle within w_resizedwsyntax int X=32 int Y=700 int Width=2469 int Height=180 int TabOrder=20 string Text="<DW Control Name>.Describe(~"DataWindow." end type type mle_dotnotation from u_mle within w_resizedwsyntax int X=32 int Y=976 int Width=2469 int Height=180 int TabOrder=10 boolean BringToTop=true string Text="<DW Control Name>.Object.DataWindow." end type type st_object from u_st within w_resizedwsyntax int X=32 int Y=36 string Text="Object:" end type type st_describe from u_st within w_resizedwsyntax int X=32 int Y=632 int Width=416 boolean BringToTop=true string Text="Describe Function:" end type type st_dotnotation from u_st within w_resizedwsyntax int X=32 int Y=912 boolean BringToTop=true string Text="Dot Notation:" end type type st_note from u_st within w_resizedwsyntax int X=32 int Y=504 boolean BringToTop=true string Text="Notes:" end type type gb_notes from u_gb within w_resizedwsyntax int X=32 int Y=560 int Width=2464 int Height=36 int TabOrder=2 string Text="" end type type st_attributes from u_st within w_resizedwsyntax int X=1280 int Y=36 boolean BringToTop=true string Text="Attributes:" end type
File: w_resizedwsyntax.srw
Size: 6406
Date: Tue, 22 Jan 2008 23:27:21 +0100
Size: 6406
Date: Tue, 22 Jan 2008 23:27:21 +0100
- w_main w_resizedwsyntax(srw)
- u_ddplb ddplb_object
- u_lb lb_attributes
- u_mle mle_describe
- u_mle mle_dotnotation
- u_st st_object
- u_st st_describe
- u_st st_dotnotation
- u_st st_note
- u_gb gb_notes
- u_st st_attributes