C / C++ / MFC

Re: Crystal Report Win32 C++ in VS2010

28-Sep-12 22:11

This[^] would be a good place to start.

One of these days I'm going to think of a really clever signature.

Davide Zaccanti1-Oct-12 10:15

Davide Zaccanti

1-Oct-12 10:15

Latest version supporting COM interface is CR XI R2, from CR 2008 version there is only .NET interface.

CR XI R2 is not free, you can download from SAP-

Migration from VC2006 to 2008

Stan the man28-Sep-12 15:55

Stan the man

28-Sep-12 15:55

HI.

I have been using 2006 and have not upgraded through the years. All works. Now, I installed VC2008 and find that the old code has many compiler errors. I am not sure where these come from.

One is ex:

for (int x = 0; x< 100;x++)
....

for (x = 0; x<5;x++)....

THis will nor work anymore... It seems I need to declare the X outside the for loop.

The other is :

Error 2440: 'static cast' cannot convert from 'void (thiscall CMyView::*)(WPARAM, LPARAM)' to '(LRESULT (thiscall CWnd::*)(WPARAM, LPARAM)'

Not sure what this one is. Never had any of these problems before.

Also, just curious if maybe I should just go to 2011 version versus 2008? Any comments?

Appreciate any help or advise.

Thanks.

Stan the man

Richard MacCutchan28-Sep-12 22:10

28-Sep-12 22:10

In your first statement above you declare x to be an integer, however it only exists within the for block, so (I assume, since you did not show all your code) when you get to the second statement, x is unknown. The C2440 message is described here[^].

One of these days I'm going to think of a really clever signature.

Stan the man28-Sep-12 23:23

Stan the man

28-Sep-12 23:23

The problem is that it works in the old code. The declaration for x is valid through the function that the second for is in. So it never was a problem before.

Richard MacCutchan28-Sep-12 23:33

28-Sep-12 23:33

Things change, and compilers enforce standards more rigidly.

One of these days I'm going to think of a really clever signature.

Marius Bancila1-Oct-12 10:29

Marius Bancila

1-Oct-12 10:29

It was not a problem before, because the compiler did things that were not standard. But starting with Visual Studio 2005, the scope of the variables does not exceed the block they are defined in. And that applies to for loops too. So you either declare the index variable before the first for loop, or re-declare it in each for statement.

As for the other problem, it's also an error with the old compiler. Your actual handler should return LRESULT, not void. So change the function to the requested signature (take a WPARAM and LPARAM and return LRESULT) and everything will be OK.

BTW, there is no such thing as VS2006. There is VS2002, VS2003, VS2005 and VS2008.

CPallini29-Sep-12 3:46

CPallini

29-Sep-12 3:46

Stan the man wrote:
for (int x = 0; x< 100;x++)

....

for (x = 0; x<5;x++)....

THis will nor work anymore... It seems I need to declare the X outside the for loop.

This because the VC compiler was not compliant with the C++ standard. See this page[^] for a reason why.
That eventually changed and VC is now compliant.

Stan the man wrote:
Error 2440: 'static cast' cannot convert from 'void (thiscall CMyView::*)(WPARAM, LPARAM)' to '(LRESULT (thiscall CWnd::*)(WPARAM, LPARAM)'

Not sure what this one is. Never had any of these problems before.

This is a change in the Microsoft's MFC library (see for instance here[^]).

Veni, vidi, vici.

Stan the man29-Sep-12 18:51

Stan the man

29-Sep-12 18:51

Thank everyone for their input. Will go through and properly get everything done. Appreciate the help.

CPallini30-Sep-12 3:03

CPallini

30-Sep-12 3:03

You are welcome.

Veni, vidi, vici.

MFC, My Picture Control has problem. [Solved]

jschell30-Sep-12 8:24

jschell

30-Sep-12 8:24

Stan the man wrote:
I have been using 2006

Just for my own sanity you are actually referring to VC6 right?

There is no such thing as "VC2006" and the compilers around 2006 such as Visual Studio 2005 were compliant. But Visual Studio C++ 6, known as VC6, was released in 1998 and was not compliant.

yu-jian28-Sep-12 4:29

yu-jian

28-Sep-12 4:29

I use the CImage::Load() to load a png file,
and then use SetBitmap() to set this image to Picture Control.
I had define a CStatic member and use DDX_Control to bind this CStatic object to Picture Control. But when CDialog startup, no image shows.

There is a similiar issule about Picture Control. I use the Picture Control to display different button images. When mouse in different area of Picture Control, this control wil display a different image,
I had a initialized operator for this Picture Control, but why only after I use mouse to move in the Picture Control, then this image will show. I do not know any other code needed to written. After SubClassDlgItem().

modified 4-Oct-12 11:38am.

Re: MFC, My Picture Control has problem.

David Crow28-Sep-12 7:29

David Crow

28-Sep-12 7:29

Code snippet?

"One man's wage rise is another man's price increase." - Harold Wilson

"Fireproof doesn't mean the fire will never come. It means when the fire comes that you will be able to withstand it." - Michael Simmons

"Show me a community that obeys the Ten Commandments and I'll show you a less crowded prison system." - Anonymous

Re: MFC, My Picture Control has problem.

jeron128-Sep-12 8:33

jeron1

28-Sep-12 8:33

I'll hazard a guess, maybe this link[^] might help.

Re: MFC, My Picture Control has problem.

yu-jian29-Sep-12 4:44

yu-jian

29-Sep-12 4:44

I resolved this problem. Because the CImage is a temperory object.
After change this CImage object to class member, it is OK.

Find ADS Files/Streams?

bosfan28-Sep-12 4:07

bosfan

28-Sep-12 4:07

Hi community,
i have a funktion to count files in a directory and its subdirectory, but how to count a ADS files, alternate da ta stream?
How to pas a path to FindFile() and FindNextFile() ??
I try to make a path from a visible file like:
"C:\visible.txt" to "C:\visible.txt:*.*" but this is not correct.
Does any one knows how to do this?

Thanks in advance
bosfan

Richard MacCutchan28-Sep-12 6:11

28-Sep-12 6:11

Your path should be something like:

C++

char* szPath = "C:\\directory\\*.ads";

You must always escape the special characters, such as backslash, in string constants in C/C++, by prefixing them with the escape character, which is a backslash. In your example you are escaping the first character (v) of the word visible.

One of these days I'm going to think of a really clever signature.

My Vote is 1

Smart Arab1-Oct-12 5:36

Smart Arab

1-Oct-12 5:36

ADS files is not file with ADS extension , it's :
windows alternate data streams.

ADS Files[^]

Smart Arab1-Oct-12 5:31

Smart Arab

1-Oct-12 5:31

Use this Code :
Streams.h

//
// return code type
//
typedef INT NTSTATUS;

//
// Check for success
//
#define NT_SUCCESS(Status) ((NTSTATUS)(Status) >= 0)

//
// The NT return codes we care about
//
#define STATUS_BUFFER_OVERFLOW           ((NTSTATUS)0x80000005L)

//--------------------------------------------------------------------
//     N T F S C O N T R O L F I L E   D E F I N I T I O N S
//--------------------------------------------------------------------

//
// Prototype for NtFsControlFile and data structures
// used in its definition
//

//
// Io Status block (see NTDDK.H)
//
typedef struct _IO_STATUS_BLOCK {
    NTSTATUS Status;
    ULONG Information;
} IO_STATUS_BLOCK, *PIO_STATUS_BLOCK;


//
// Apc Routine (see NTDDK.H)
//
typedef VOID (*PIO_APC_ROUTINE) (
				PVOID ApcContext,
				PIO_STATUS_BLOCK IoStatusBlock,
				ULONG Reserved
			);

//
// File information classes (see NTDDK.H)
//
typedef enum _FILE_INFORMATION_CLASS {
// end_wdm
    FileDirectoryInformation       = 1,
    FileFullDirectoryInformation, // 2
    FileBothDirectoryInformation, // 3
    FileBasicInformation,         // 4  wdm
    FileStandardInformation,      // 5  wdm
    FileInternalInformation,      // 6
    FileEaInformation,            // 7
    FileAccessInformation,        // 8
    FileNameInformation,          // 9
    FileRenameInformation,        // 10
    FileLinkInformation,          // 11
    FileNamesInformation,         // 12
    FileDispositionInformation,   // 13
    FilePositionInformation,      // 14 wdm
    FileFullEaInformation,        // 15
    FileModeInformation,          // 16
    FileAlignmentInformation,     // 17
    FileAllInformation,           // 18
    FileAllocationInformation,    // 19
    FileEndOfFileInformation,     // 20 wdm
    FileAlternateNameInformation, // 21
    FileStreamInformation,        // 22
    FilePipeInformation,          // 23
    FilePipeLocalInformation,     // 24
    FilePipeRemoteInformation,    // 25
    FileMailslotQueryInformation, // 26
    FileMailslotSetInformation,   // 27
    FileCompressionInformation,   // 28
    FileObjectIdInformation,      // 29
    FileCompletionInformation,    // 30
    FileMoveClusterInformation,   // 31
    FileQuotaInformation,         // 32
    FileReparsePointInformation,  // 33
    FileNetworkOpenInformation,   // 34
    FileAttributeTagInformation,  // 35
    FileTrackingInformation,      // 36
    FileMaximumInformation
// begin_wdm
} FILE_INFORMATION_CLASS, *PFILE_INFORMATION_CLASS;


//
// Streams information
//
#pragma pack(4)
typedef struct {
	ULONG    	        NextEntry;
	ULONG    	        NameLength;
	LARGE_INTEGER    	Size;
	LARGE_INTEGER    	AllocationSize;
	USHORT    	        Name[1];
} FILE_STREAM_INFORMATION, *PFILE_STREAM_INFORMATION;
#pragma pack()

Streams.c

#define UNICODE 1
#include <windows.h>
#include <stdio.h>
#include "streams.h"


//
// Native functions we use
//
NTSTATUS (__stdcall *NtQueryInformationFile)( 
    IN HANDLE FileHandle,
    OUT PIO_STATUS_BLOCK IoStatusBlock,
    OUT PVOID FileInformation,
    IN ULONG Length,
    IN FILE_INFORMATION_CLASS FileInformationClass
    );

ULONG (__stdcall *RtlNtStatusToDosError) (
		IN NTSTATUS Status
		);

//
// Globals
//
ULONG FilesWithStreams = 0;
ULONG FilesProcessed = 0;
ULONG DotsPrinted = 0;
BOOLEAN PrintDirectoryOpenErrors = FALSE;

//----------------------------------------------------------------------
//
// PrintNtError
//
// Formats an error message for the last native error.
//
//----------------------------------------------------------------------
void PrintNtError( NTSTATUS status )
{
	WCHAR *errMsg;

	FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM,
			NULL, RtlNtStatusToDosError( status ), 
			MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), 
			(LPTSTR) &errMsg, 0, NULL );
	wprintf(L"%s\n", errMsg );
	LocalFree( errMsg );
}

//--------------------------------------------------------------------
//
// PrintWin32Error
// 
// Translates a Win32 error into a text equivalent
//
//--------------------------------------------------------------------
void PrintWin32Error( DWORD ErrorCode )
{
	LPVOID lpMsgBuf;
 
	FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM,
					NULL, ErrorCode, 
					MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
					(LPTSTR) &lpMsgBuf, 0, NULL );
	wprintf(L"%s\n", lpMsgBuf );
	LocalFree( lpMsgBuf );
}

//----------------------------------------------------------------------
//
// EnableTokenPrivilege
//
// Enables the load driver privilege
//
//----------------------------------------------------------------------
BOOL EnableTokenPrivilege( PTCHAR PrivilegeName )
{
    TOKEN_PRIVILEGES tp;
    LUID luid;
	HANDLE	hToken;
    TOKEN_PRIVILEGES tpPrevious;
    DWORD cbPrevious=sizeof(TOKEN_PRIVILEGES);

	//
	// Get debug privilege
	//
	if(!OpenProcessToken( GetCurrentProcess(),
				TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY,
				&hToken )) {
	
		return FALSE;
	}
	
    if(!LookupPrivilegeValue( NULL, PrivilegeName, &luid )) return FALSE;

    //
    // first pass.  get current privilege setting
    //
    tp.PrivilegeCount           = 1;
    tp.Privileges[0].Luid       = luid;
    tp.Privileges[0].Attributes = 0;

    AdjustTokenPrivileges(
            hToken,
            FALSE,
            &tp,
            sizeof(TOKEN_PRIVILEGES),
            &tpPrevious,
            &cbPrevious
            );

    if (GetLastError() != ERROR_SUCCESS) return FALSE;

    //
    // second pass.  set privilege based on previous setting
    //
    tpPrevious.PrivilegeCount       = 1;
    tpPrevious.Privileges[0].Luid   = luid;
    tpPrevious.Privileges[0].Attributes |= (SE_PRIVILEGE_ENABLED);
    AdjustTokenPrivileges(
            hToken,
            FALSE,
            &tpPrevious,
            cbPrevious,
            NULL,
            NULL
            );

    return GetLastError() == ERROR_SUCCESS;
}


//--------------------------------------------------------------------
//
// ProcessFile
//
// Queries a file to obtain stream information.
//
//--------------------------------------------------------------------
VOID ProcessFile( WCHAR *FileName, BOOLEAN IsDirectory, BOOLEAN Delete )
{
    PFILE_STREAM_INFORMATION  streamInfo, streamInfoPtr;
    ULONG    streamInfoSize = 0;
    BOOLEAN  printedFile = FALSE;
    NTSTATUS status;
    HANDLE   fileHandle;
    WCHAR    streamName[MAX_PATH];
    WCHAR    fullStreamName[MAX_PATH];
    IO_STATUS_BLOCK ioStatus;

    //
    // Open the file
    //
    fileHandle = CreateFile( FileName, GENERIC_READ,
					FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, 
					OPEN_EXISTING, 
					FILE_FLAG_BACKUP_SEMANTICS, 0 );
    if( fileHandle == INVALID_HANDLE_VALUE ) {

        if( !IsDirectory || PrintDirectoryOpenErrors ) {

            wprintf(L"\rError opening %s:\n", FileName );
            PrintWin32Error( GetLastError() );
        }
        return;
    }

    if( !(++FilesProcessed % 500)) {

        if( DotsPrinted == 3 ) {

            wprintf(L"\r     \r");
            DotsPrinted = 0;

        } else {
            DotsPrinted++;
            wprintf(L".");
        }
        fflush( stdout );
    }
    
    streamInfoSize = 16384;
    streamInfo = malloc( streamInfoSize );
    status = STATUS_BUFFER_OVERFLOW;
    while( status == STATUS_BUFFER_OVERFLOW ) {

        status = NtQueryInformationFile( fileHandle, &ioStatus,
                                         streamInfo, streamInfoSize,
                                         FileStreamInformation );
        if( status == STATUS_BUFFER_OVERFLOW ) {

            free( streamInfo );
            streamInfoSize += 16384;
            streamInfo = malloc( streamInfoSize );

        } else {

            break;
        }
    }

    //
    // If success, dump the contents
    //
    if( NT_SUCCESS( status ) && ioStatus.Information ) {

        streamInfoPtr = streamInfo;
        while( 1 ) {
            
            memcpy( streamName, 
                     streamInfoPtr->Name, 
                     streamInfoPtr->NameLength );
            streamName[ streamInfoPtr->NameLength/2 ] = 0;

            //
            // Skip the standard Data stream
            //
            if( wcsicmp( streamName, L"::$DATA" )) {

                if( !printedFile ) {
                    wprintf(L"\r%s:\n", FileName );
                    printedFile = TRUE;
                }

                if( Delete ) {

                    swprintf( fullStreamName, L"%s%s", FileName, streamName );
                    if( !DeleteFile( fullStreamName )) {

						wprintf(L"   Error deleting %s:\n", streamName );
						PrintWin32Error( GetLastError());
					} else {

						wprintf(L"   Deleted %s\n", streamName );
					}
                } else {

					wprintf(L"   %20s\t%I64d\n", streamName, streamInfoPtr->Size.QuadPart );
				}
            }

            if( !streamInfoPtr->NextEntry ) break;

            FilesWithStreams++;
            streamInfoPtr = (PFILE_STREAM_INFORMATION) ((char *) streamInfoPtr + 
                                                     streamInfoPtr->NextEntry );
        }

    } else if( !NT_SUCCESS( status )) {

        wprintf(L"\rError on %s: ", FileName );
        PrintNtError( status );
    }
    free( streamInfo );
    CloseHandle( fileHandle );
}



//--------------------------------------------------------------------
//
// ProcessDirectory
// 
// Recursive routine that passes files to the stream analyzing 
// function.
//
//--------------------------------------------------------------------
void ProcessDirectory( WCHAR *PathName, WCHAR *SearchPattern, 
                       BOOLEAN Recurse, BOOLEAN Delete )
{
	WCHAR			subName[MAX_PATH], fileSearchName[MAX_PATH], searchName[MAX_PATH];
	HANDLE			dirHandle, patternHandle;
	static BOOLEAN	firstCall = TRUE;
	WIN32_FIND_DATA foundFile;

	//
	// Scan the files and/or directories if this is a directory
	//
	if( firstCall ) {

		if( PathName[ wcslen( PathName ) - 1] == L'\\' ) {

			PathName[ wcslen( PathName ) - 1] = 0;
		}

		if( wcsrchr( PathName, '*' ) ) {
	
            if( wcsrchr( PathName, '\\' ) ) {

                swprintf( SearchPattern, wcsrchr( PathName, '\\' )+1 );
                wcscpy( searchName, PathName );
                wcscpy( wcsrchr( searchName, '\\')+1, L"*.*" );

            } else {
                
                swprintf( SearchPattern, PathName );
                wcscpy( searchName, PathName );
            }
            swprintf( fileSearchName, L"%s", PathName );

		} else {

			swprintf( SearchPattern, L"*.*" );
            if( Recurse ) {

                swprintf( searchName, L"%s\\*.*", PathName );
                swprintf( fileSearchName, L"%s\\*.*", PathName );
            } else {

                swprintf( searchName, L"%s", PathName );
                swprintf( fileSearchName, L"%s", PathName );
            }
		}

	} else {

		swprintf( searchName, L"%s\\*.*", PathName );
		swprintf( fileSearchName, L"%s\\%s", PathName, SearchPattern );
	}

	//
	// Process all the files, according to the search pattern
	//
	if( (patternHandle = FindFirstFile( fileSearchName, &foundFile )) != 
		INVALID_HANDLE_VALUE  ) {

		do {

			if( firstCall || (wcscmp( foundFile.cFileName, L"." ) &&
				wcscmp( foundFile.cFileName, L".." ))) {

				wcscpy( subName, searchName );
				if( wcsrchr( subName, '\\' ) ) 
					wcscpy( wcsrchr( subName, '\\')+1, foundFile.cFileName );
				else
					wcscpy( subName, foundFile.cFileName );

				//
				// Do this file/directory
				//
				ProcessFile( subName, 
                             (BOOLEAN) (foundFile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY), 
                             Delete );
			}
		} while( FindNextFile( patternHandle, &foundFile ));
		FindClose( patternHandle );
	}

	//
	// Now recurse if we're supposed to
	//
	if( Recurse ) {

        if( firstCall && !wcsrchr( searchName, L'\\') ) {

            if( wcsrchr( searchName, L'*' )) {

                if( (dirHandle = FindFirstFile( L"*.*", &foundFile )) == 
                    INVALID_HANDLE_VALUE  ) {

                    //
                    // Nothing to process
                    //
                    return;
                }
            } else {

                if( (dirHandle = FindFirstFile( searchName, &foundFile )) == 
                    INVALID_HANDLE_VALUE  ) {

                    //
                    // Nothing to process
                    //
                    return;
                }
            }
        } else {

            if( (dirHandle = FindFirstFile( searchName, &foundFile )) == 
                INVALID_HANDLE_VALUE  ) {

                //
                // Nothing to process
                //
                return;
            }
        }
        firstCall = FALSE;

		do {

			if( (foundFile.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) &&
				wcscmp( foundFile.cFileName, L"." ) &&
				wcscmp( foundFile.cFileName, L".." )) {

				wcscpy( subName, searchName );
				if( wcsrchr( subName, '\\' ) ) 
					wcscpy( wcsrchr( subName, '\\')+1, foundFile.cFileName );
				else
					wcscpy( subName, foundFile.cFileName );

				//
				// Go into this directory
				//
				ProcessDirectory( subName, SearchPattern, Recurse, Delete );

			}
		} while( FindNextFile( dirHandle, &foundFile ));
	}

	FindClose( dirHandle );
}


int Usage( WCHAR *ProgramName ) 
{
    wprintf(L"usage: %s [-s] [-d] <file or directory>\n", ProgramName );
    wprintf(L"-s     Recurse subdirectories\n");
    wprintf(L"-d     Delete streams\n\n");
    return -1;
}


int wmain( int argc, WCHAR *argv[] ) 
{
    BOOLEAN     recurse = FALSE, delete = FALSE;
    PWCHAR      filePart;
	WCHAR		volume[] = L"C:\\";
	DWORD		fsFlags;
    WCHAR       searchPattern[MAX_PATH];
	WCHAR		searchPath[MAX_PATH];
    int         i;

    

    if( argc > 1 ) {
        
        for( i = 1; i < argc; i++ ) {

            if( argv[i][0] != L'/' && argv[i][0] != L'-' ) {

                if( i != argc-1 ) {

                    wprintf( argv[i] );
                    return Usage( argv[0] );
                }
				continue;
            }

            if( argv[i][1] == L's' || argv[i][1] == L'S' ) {

                recurse = TRUE;

            } else if( argv[i][1] == L'd' || argv[i][1] == 'D' ) {

                delete = TRUE;

            } else return Usage( argv[0] );
        }
    } else {

        return Usage( argv[0] );
    }

    //
    // Enable backup privilege if we can
    //
    if( EnableTokenPrivilege( SE_BACKUP_NAME )) {

        PrintDirectoryOpenErrors = TRUE;
    }

    //
    // Load the NTDLL entry point we need
    //
	if( !(NtQueryInformationFile = (void *) GetProcAddress( GetModuleHandle(L"ntdll.dll"),
			"NtQueryInformationFile" )) ) {

		wprintf(L"\nCould not find NtQueryInformationFile entry point in NTDLL.DLL\n");
		exit(1);
	}
	if( !(RtlNtStatusToDosError = (void *) GetProcAddress( GetModuleHandle(L"ntdll.dll"),
							"RtlNtStatusToDosError" )) ) {

		wprintf(L"\nCould not find RtlNtStatusToDosError entry point in NTDLL.DLL\n");
		exit(1);
	}
	GetFullPathName( argv[argc-1], MAX_PATH, searchPath, &filePart );

	//
	// Make sure that its a FAT volume
	//
	if( searchPath[1] == L':' ) {

		fsFlags = 0;
		volume[0] = searchPath[0];
		GetVolumeInformation( volume, NULL, 0, NULL, NULL, &fsFlags, NULL, 0 );
		if( !(fsFlags & FILE_NAMED_STREAMS )) {

			wprintf(L"\nThe specified volume does not support streams.\n\n");
			exit(2);
		}
	}
    
    //
    // Now go and process directories
    //
    ProcessDirectory( searchPath, searchPattern, recurse, delete );

    if( !FilesWithStreams ) wprintf(L"No files with streams found.\n\n");
    return 0;
}

bosfan1-Oct-12 20:27

bosfan

1-Oct-12 20:27

Hi there,
thanks for help!

That is new for me.

Best Regards
bosfan

Has anybody tried the new C++ RAD Toolkit SmartDB (http://sdb.net.in)

bosfan16-Oct-12 20:45

bosfan

16-Oct-12 20:45

Hi,
in this example i need a WDK installed, is this right?
Because VS 10 don't know a "NtQueryInformationFile" and i found on microsoft.com that i need "ntifs.h" to include for this? After all ntifs.h is on my system but now i can't find "windowsfamiliy.h" Frown | :(

Best wishes
bosfan

sumeet12327-Sep-12 22:32

sumeet123

27-Sep-12 22:32

Can somebody try the new innovative C++ RAD Toolkit SmartDB (http://sdb.net.in[^]) and give some feedback.

Re: Has anybody tried the new C++ RAD Toolkit SmartDB (http://sdb.net.in)

Richard MacCutchan28-Sep-12 2:00