mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-10-31 22:49:30 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			39 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			39 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
| unit msgjsonviewer; 
 | |
| 
 | |
| {$mode objfpc}
 | |
| 
 | |
| interface
 | |
| 
 | |
| uses
 | |
|   Classes, SysUtils;
 | |
| 
 | |
| Resourcestring
 | |
| 
 | |
|   SCaption = 'JSON Viewer';
 | |
|   SEmpty   = 'Empty document';
 | |
|   SArray   = 'Array (%d elements)';
 | |
|   SObject  = 'Object (%d members)';
 | |
|   SNull    = 'null';
 | |
| 
 | |
|   SNewMember        = 'New object member';
 | |
|   SNewMemberName    = 'Enter a name for the new member (type: %s)';
 | |
|   SElement          = 'Element nr. %d';
 | |
|   SDocumentModified = 'JSON document modified';
 | |
|   SDocumentModifiedAction = 'The JSON data was changed but not saved.'+slinebreak+
 | |
|                              'What do want to do ?';
 | |
|   SDuplicateMemberName = 'Duplicate member name "%s".';
 | |
|   SErrinvalidValue = 'Invalid value or wrong type: "%s"';
 | |
|   SErrNoValidJSONClipBoard = 'The clipboard does not contain valid JSON data';
 | |
|   SErrCreatingConfigDir = 'Could not create the configuration files directory "%s"';
 | |
|   SNoMoreMatches = 'No nodes match the criterium';
 | |
| 
 | |
|   SDiscard = 'Discard changes';
 | |
|   SSaveData = 'Save the changes';
 | |
|   SCancelClose = 'Do not close the window';
 | |
|   SCancelPaste = 'Do not paste the new data';
 | |
| 
 | |
| implementation
 | |
| 
 | |
| end.
 | |
| 
 | 
