( Oops | 2010. 03. 11., cs - 16:36 )

elvileg de igen

(valamiért nem toom futtani:
egy.pas(8,58) Error: Identifier not found "rfReplaceAll"

a hívás meg ilyen:

uses strutils;
var egy,ketto: array [1..2] of string;
begin
egy[1]:='Egy-egy';
egy[2]:='Egy-kettő';
ketto[1]:='Kettő-egy';
ketto[2]:='Kettő-kettő';
WriteLn(StringsReplace('Egy-egy',egy,ketto,[rfReplaceAll]));
end.

azonban oktatási céllal kéne... szóval, azon felül, hogy mit rontok el most, érdekelne az eredeti kérdésre is a válasz..