mirror of
https://git.sr.ht/~rabbits/macintosh_cookbook
synced 2024-06-01 11:42:07 +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.
|