Added Helpers library
This commit is contained in:
40
Examples/Helpers/HL_SizeString.hws
Normal file
40
Examples/Helpers/HL_SizeString.hws
Normal file
@@ -0,0 +1,40 @@
|
||||
/*
|
||||
*********************************************
|
||||
*** Helpers.hws Example : HL.SizeString() ***
|
||||
*********************************************
|
||||
*/
|
||||
|
||||
@INCLUDE "../../+Includes.hws"
|
||||
@INCLUDE #INC_HELPERS
|
||||
|
||||
NPrint("HL.SizeString Example")
|
||||
NPrint("---------------------\n")
|
||||
|
||||
; Suppose you have 40 character screen and a table with <n> entries with the
|
||||
; fields <name> and <surnames>, you want to print a table with these
|
||||
; informations:
|
||||
|
||||
; Initialize the table with some items
|
||||
Local people =
|
||||
{ { name = "Clark", surname = "Kent" },
|
||||
{ name = "Peter", surname = "Parker" },
|
||||
{ name = "Bruce", surname = "Wayne" } }
|
||||
|
||||
; Now we will print a nice table to the screen with the first column of 14
|
||||
; characters and the second one of 22 (plus 3 separators):
|
||||
|
||||
; Header
|
||||
NPrint("|" .. HL.SizeString("NAME", 14) .. "|" .. HL.SizeString("SURNAME", 22) .. "|")
|
||||
|
||||
; Contents
|
||||
For Local i = 0 To 2
|
||||
NPrint("|" .. HL.SizeString(people[i].name, 14) ..
|
||||
"|" .. HL.SizeString(people[i].surname, 22) .. "|")
|
||||
Next
|
||||
|
||||
; Exemple with string exceeding the available space
|
||||
NPrint("|" .. HL.SizeString("This is an extremely long line!", 14) ..
|
||||
"|" .. HL.SizeString("Another line, see how it works?", 22) .. "|")
|
||||
|
||||
NPrint("\n--- Left mouse button to quit ---")
|
||||
WaitLeftMouse()
|
Reference in New Issue
Block a user