Datum mit Datum austauschen

[aaron]

Hallo,
sorry, ich weiß es ist unhöflich nach so kurzer Zeit zu pushen, leider brauche ich ganz, ganz superdringend eine Antwort bzw. Hilfe.

Habe auch hiermit rumprobiert, leider ohne Ergolg:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
Var d,d1: String;
    S: TDateTime;
begin
d:=(StripNonConforming('TEST TEST 12.11.2055 Test.',['0'..'9']));
d1:=Copy(d,1,2)+'.'+Copy(d,3,2)+'.'+Copy(d,5,2);
s:=StrToDate(d1);
ShowMessage(FormatDateTime('ddmmyyyy',s));
end;

Zitat von hoika:

Hallo,

der Text sollte intern ohne das Datum (nur als Platzhalter)
gespeichert sein. Das Datum wird extra gespeichert.
Beim Füllen des StringGrids wird dann der Text zusammengebaut.

Das geht leider auch nicht weil das Datum mitten im Text stehen kann (an keiner festen Stelle)

Freundliche Grüße
Aaron