The name of the group shall be: “Save Shroggs Park Pavilion Group.”
To bring the Shroggs Park Pavilion back into use, and encourage more sports to use the pavilion and other sports facilities at Shroggs Park.
Use Windows.pkg | |
Object oTest is a ModalPanel | |
Set Location to 10 5 | |
Set Size to 20 61 | |
Set Label to "On the top" | |
Set Window_Style WS_SYSMENU to False | |
Object oButton1 is a Button | |
Set Location to 3 4 |
Function SplitToArray Global String sVal String sChar Returns String[] | |
String[] astVal | |
String sHold | |
Integer iCount | |
Integer iPos | |
Integer iBreak | |
Integer iMax | |
Move (Length(sVal)) to iMax | |
Move (Length(sChar)) to iBreak |
//************************************************************************ | |
// | |
// Confidential Trade Secret. | |
// Copyright 1987-1992 Data Access Corporation, Miami FL, USA | |
// All Rights reserved | |
// DataFlex is a registered trademark of Data Access Corporation. | |
// | |
// | |
// $Source: k:\RCS\.\pkg\for_all.pkg,v $ | |
// $Revision: 1 $ |
<p> | |
Drag the following link to your bookmarks. <br/> | |
<a class="bookmarklet" href="javascript:(function()%7B%24%24(%22s_club__club_code%22).type%3D%22%22%7D)()">Show Club</a><br/> | |
When in the adhoc screen, click the link, and manually type in the club.<br/> | |
Sublime-Style-Column-Selection |
External_Function WinAPI_GetCurrentProcessId "GetCurrentProcessId" Kernel32.Dll Returns Integer | |
External_Function WinAPI_EnumProcessModules "EnumProcessModules" Psapi.Dll Handle hProcess Address lphModule Integer cb Pointer lpcbNeeded Returns Integer | |
External_Function WinAPI_CloseHandle "CloseHandle" Kernel32.Dll Handle hObject Returns Integer | |
External_Function WinAPI_OpenProcess "OpenProcess" Kernel32.Dll DWord dwDesiredAccess Boolean bInheritHandle DWord dwProcessId Returns Handle | |
Define PROCESS_TERMINATE for |CI$0001 | |
Define PROCESS_CREATE_THREAD for |CI$0002 | |
Define PROCESS_SET_SESSIONID for |CI$0004 | |
Define PROCESS_VM_OPERATION for |CI$0008 | |
Define PROCESS_VM_READ for |CI$0010 |
//Filters an array according to a passed parameter. | |
//e.g. | |
//move (FilterArray(aStringList,self,get_is_uppercase)) to aStringList | |
Function FilterArray Global Variant[] aVariant Integer hObj Integer iMsg Returns Variant[] | |
Variant[] aReturn | |
Integer iPos | |
Integer iCopied | |
Integer iMax | |
Boolean isOK |
SELECT 'ALTER TABLE [' + SYSOBJECTS.Name + ']' + ' ' + ' COLLATE Latin1_General_CI_AS ' | |
FROM SYSOBJECTS | |
WHERE SYSOBJECTS.TYPE = 'U' | |
GO |