[r3]: / testproject-prj,testproject,code / Project Information_1 / GetTextProperty / svnobj  Maximize  Restore  History

Download this file

12 lines (11 with data), 2.7 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
IF stKey = "Company" THEN
	GetTextProperty := "ifm electronic";
ELSIF stKey = "Description" THEN
	GetTextProperty := "CR710S 2.25MByte Standard and Safety";
ELSIF stKey = "Project" THEN
	GetTextProperty := "CR710Stemplate";
ELSIF stKey = "Title" THEN
	GetTextProperty := "ifmCR710S_TemplateProject";
ELSE
	GetTextProperty := "";
END_IF