program Test;
var
S : String(7);
begin
S := 'SCHNAPS';
S := S + #48 + #48; { wow, the string expands the size - that's right? }
Writeln(S);
Writeln(S + #48#48); { This is needed for Borland style! }
end.
Sven Hilscher (Sven@rufus.central.de (Sven Hilscher))