Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
man kann das proggi jetzt saugen:
http://www.delphipraxis.net/internal_redirect.php?p=530551#530551
thx an alle helfer.
mfG toredo
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
:cheers: thx jetzts funzts...
aber etwas funzt an dem prog noch nicht, aber den fehler im source find ich noch:
alles hat geklappt bis ich meinen namen+den namen eines bestimmten girls eingegeben habe dann kam -99 raus :?
mfG toredo
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
:mrgreen: würd ich gern machen, aber ist mir zu schwer, :???: ich habe ja auch erst am dienstag das erste mal was mit delphi gemacht^^
aber noch mals chnel zum code, weil den möcht ich fertigbringen :zwinker:
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
name1:=LowerCase(Edit1.Text);
name2.Text:=LowerCase(Edit2.Text);
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
hay,
:gruebel: kann es sein das wenn ich lowercase benutze immer 0 zurückkommt?
weil nach dem lowercase bekommt die variable imemr den wert 0.
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
name1:=Edit1.Text;
name1:=Edit2.Text;
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
dann werd ich das prog mal vertigstellen udn es dann in den open-source bereich reinmachen, thx an alle die geholfen haben.
mfG toredo
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
das proggi ist gleich fertig ich ahb nur ncoh zwei ganz kleine probs.
wie schaff ich es, dass alle buchstaben in diese zeile kommen:
zahl := zahlen * zahlen * zahlen * zahlen;
also damit mein ich, dass das wort so zerlegt wird.
und das zweite problem ist, dass grossbuchstaben nicht angenommen werden, d.h. wenn ich statt zahlen zahlen hinschreibe kommt ein fehler beim kompilieren.
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
:mrgreen: 6978680257 %^^
du hast nen kleinen fehler gemacht;)
diese zeile stimmt noch:
30008325104105 + 1738 = 30008325105843
dann wird die 43 abgetrent, weil das die letzten zwei ziffern sind, d.h. die beiden passen nur zu 43% zusammen:)
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
ich lieb dieses forum, kaum hab ich den beitrag geschrieben hab ich auch schon x antworen bekommen, ich werde mal eine anch der anderen durchprobieren, danke@all :roll:
das wäre mir alles schon zu kompliziert, ich wüsste da nicht mal wie ich beim code anfangen müsste...
obwohldas programm an sich sinnlos ist, lern ich dabei trozdem einige neue funktionen kennen :mrgreen:
mfG toredo
Forum: Object-Pascal / Delphi-Language
Delphi
by toredo,
10. Apr 2006
hay,
ich möchte so ein liebes-tester-proggi machen.
als ausgabe sollte kommen, zu wie viel prozent zwei leute zusammenpassen.
aber ich ich möchte das nicht mit random(100) machen, weil dann kann man ja mit den selben zwei namen x verschiedene ergebnisse bekommen...
ich hab mal nachgedacht, wie ichs machen könnte und dann bin ich auf eine idee gekommen:
das Programm shcneidet die beiden...