AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Pascal - IntToStr ??

Ein Thema von Lillebrohr · begonnen am 3. Jul 2003 · letzter Beitrag vom 3. Jul 2003
Antwort Antwort
Lillebrohr
(Gast)

n/a Beiträge
 
#1

Pascal - IntToStr ??

  Alt 3. Jul 2003, 17:55
Guten Tag,

Ich habe 3 Zahlenwerte (12,15,18), die möchte ich jetzt zusammenfassen als String, so das nachher das rauskommt : 121518. Diese Zahl will ich dann noch weiter benutzen. Wie kann ich das machen ? In delphi ginge das ja mit inttostr(XX) und dann wieder strtoint.

Danke, Tschau
  Mit Zitat antworten Zitat
Daniel B
(Gast)

n/a Beiträge
 
#2
  Alt 3. Jul 2003, 18:04
Hallo,

und warum machst Du es nicht mit IntToStr();? Du musst doch nur vorher die Zahl durchgehen und die , rauslöschen.

Grüsse, Daniel

PS: Ab nach Delphi-Language, die Sparte Programmieren allgemein ist nur für andere Programmiersprachen gedacht!
  Mit Zitat antworten Zitat
Chewie

Registriert seit: 10. Jun 2002
Ort: Deidesheim
2.886 Beiträge
 
Turbo Delphi für Win32
 
#3
  Alt 3. Jul 2003, 18:06
Wenn dir der (geringe) Geeschwindigkeitsverlust nichts ausmacht, kannst du auch Formatstrings benutzen:

Delphi-Quellcode:
var
  s: String;
begin
  s := Format(%d%d%d,[12,15,18]);
end;
Oder halt doch so:

Delphi-Quellcode:
var
  s: String;
begin
  s := InttoStr(12) + InttoStr(15) + (InttoStr(18));
end;
Wenn du damit allerdings weiterrechnen willst, musst du es schon mit InttoStr() in einen Integerwert umwandeln.
Martin Leim
Egal wie dumm man selbst ist, es gibt immer andere, die noch dümmer sind
  Mit Zitat antworten Zitat
Lillebrohr
(Gast)

n/a Beiträge
 
#4
  Alt 3. Jul 2003, 18:08
Guten Tag,

Hi Daniel,

sorry wegen der falschen Sparte.

Hmm das mit inttostr funktioniert bei mir nicht. (Turbo Pascal)

Wie meinst du das mit "Du musst doch nur vorher die Zahl durchgehen und die , rauslöschen." ?

Danke, tschau
  Mit Zitat antworten Zitat
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.105 Beiträge
 
Delphi 11 Alexandria
 
#5
  Alt 3. Jul 2003, 18:08
Moin Daniel, moin Chewie,

die Frage bezieht sich auf Pascal, nicht auf Delphi (siehe Überschrift)
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
Lillebrohr
(Gast)

n/a Beiträge
 
#6
  Alt 3. Jul 2003, 18:21
Guten Tag,

Chewie:

Wie gesagt inttostr funktioniert bei mir nicht.

Tschau
  Mit Zitat antworten Zitat
Benutzerbild von Duffy
Duffy

Registriert seit: 19. Mär 2003
Ort: Wuppertal
835 Beiträge
 
Delphi 3 Standard
 
#7
  Alt 3. Jul 2003, 18:22
Hallo Lillebrohr,
schau Dir mal die beiden Funktionen Str und Val an
bye
Künftige Generationen wollen ihre Fehler selber machen.
Jedes Programm wird nie das können, was Du wirklich brauchst.
Das Gegenteil von gut ist gut gemeint
-----
  Mit Zitat antworten Zitat
Henni

Registriert seit: 1. Jul 2003
Ort: Chemnitz
9 Beiträge
 
Delphi 5 Standard
 
#8
  Alt 3. Jul 2003, 18:22
also ich würde das ungefähr so machen :
zahlen 1...9 lassen sich umrechnen durch
Code:
var x, y, z: integer;
  var c: char;
  var ziel: string;

  c:= chr(x+ 30); // damit bekommst du die einzelne stelle
  ziel:= ziel + c;
  ....
um die einzelnen Stellen abzuscheidenmusste mit MOD und DIV
rumspielen. das muss irgendwie rekursiv gehen.
das ganz errinnert mich an alte assembler-zeiten. evtl findest du ja
was, wenn du mal in die richtung schaust...

grüße
Henni
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:16 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz