mirror of
https://git.sr.ht/~rabbits/macintosh_cookbook
synced 2025-01-14 05:31:11 +00:00
20 lines
183 B
ObjectPascal
20 lines
183 B
ObjectPascal
program ExampleString;
|
|
|
|
var
|
|
foo: String;
|
|
|
|
begin
|
|
|
|
ShowText;
|
|
|
|
foo := 'foo';
|
|
Writeln(foo);
|
|
|
|
foo[1] := 'b';
|
|
foo[2] := 'a';
|
|
foo[3] := 'r';
|
|
|
|
Writeln(foo); { outputs: bar }
|
|
|
|
end.
|