Forum: Sonstige Fragen zu Delphi
Delphi
by Mithrandir,
11. Jul 2009
Ich auch nicht. :mrgreen:
Forum: Sonstige Fragen zu Delphi
Delphi
by Mithrandir,
11. Jul 2009
Jepp, so isses, und diese Funktion produziert denselben Output wie die Variante in C:
function Encrypt(var txt: string): bool;
var x: byte;
begin
for x := 1 to length(txt) do
begin
txt := Chr( BYTE(Ord(txt) + (3 xor (X-1)) * ((X-1) mod 15)) );
if Ord(txt) >= 255 then
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by Mithrandir,
11. Jul 2009
Du bist süß:
Und damit haben wir wieder den Delphi-Output, den Tobi in #8 angegeben hat. ;)
Forum: Sonstige Fragen zu Delphi
Delphi
by Mithrandir,
11. Jul 2009
Aber dann wäre interessant zu wissen, warum die Ausgaben aus C und Delphi so unterschiedlich sind. Zumal sich in Delphi ein Muster erkennen lässt, in C aber nicht...
Forum: Sonstige Fragen zu Delphi
Delphi
by Mithrandir,
11. Jul 2009
Jupp, ist mir jetzt auch wieder eingefallen, dass Power keinen Integer mag. ;) Aber der Code funktioniert jetzt, oder?
Forum: Sonstige Fragen zu Delphi
Delphi
by Mithrandir,
11. Jul 2009
Moin,
das ist mir klar. ;) Ich wollte auch eher wissen, wie er in seinem Delphi-Code die Variable x deklariert hat. Denn irgendwie müssen die inkompatiblen Typen ja entstehen. ;)
Forum: Sonstige Fragen zu Delphi
Delphi
by Mithrandir,
11. Jul 2009
Als was ist denn x deklariert?