Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Text suche //werte rückgabe (https://www.delphipraxis.net/69332-text-suche-werte-rueckgabe.html)

.echo 13. Mai 2006 17:08


Text suche //werte rückgabe
 
Hallo,
Also jemand meinte ich solle ihm ein Programm schreiben, wobei ich nicht alle funktionen mit meinem derzeitigen wissenstant relisieren konnte;

Also hab folgendes Problem;

Der Angreifer hat die Schlacht gewonnen!
Er erbeutet
1478451 Metall, 614410 Kristall und 1963065 Deuterium

Der Angreifer hat insgesamt 10932000 Units verloren.
Der Verteidiger hat insgesamt 191716000 Units verloren.
Auf diesen Raumkoordinaten liegen nun 11267400 Metall und 14824200 Kristall.
Die Chance einer Mondentstehung beträgt 20 %


e+06 oder wie hier 7 sind die stellen hinter dem punkt.

Deine 1400 Recycler haben eine Gesamtladekapazität von 28000000. Auf dem Ziel treiben 1.12674e+07 Metall und 1.48266e+07 Kristall im Raum. Du hast 11267400 Metall und 1.48266e+07 Kristall abgebaut.


Also alle diese grün markierten Werte sollen in einer stringvariable aus dem text gelesen werden und in je eine stringvariable gespeichert werden;

Hab es nun mit erschiedenen möglichkeiten versucht, hat bei mir jedoch noch nicht so wirklich geklappt;

Würde mich über eine Antwort freuen;
mfg
s:b

jmd anders 13. Mai 2006 18:02

Re: Text suche //werte rückgabe_; Help---.--
 
Dann speicherst du erst einmal den gesamten Text in einen string
und suchst am besten die Stellen im Text raus, die je nach dem vor und hinter den Werten liegen und statisch sind (mit der Funktion "Ansipos", welche die Position einer gefunden Zeichenkette zurückgibt). Also bei jeder Textmeldung gleich bleiben.

Um nur die Werte zu kopieren, lässt du am besten eine Schleife laufen, die aufhört, wenn zum Beispiel ein Leerzeichen auftritt ("1231234L ").

.echo 13. Mai 2006 18:54

Re: Text suche //werte rückgabe_; Help---.--
 
Thx erstmal,
Aber das mit dem text in den string einlesen hab ich schon versucht, das klappt ja wunderbar;
Probleme bekomm ich nur wenn ich nach den werden suche; Da diese ja nicht immer an der selben position sind, ich müsste also praktisch immer die zahlen ketten finden;
kette 1 finden->variable zuordnen
kette 2 finden->variable zuordnen
kette 3 finden->variable zuordnen usw...

wobei dann wieder das problem auftritt das nicht alle der zahlen ketten voll ausgeschrieben sind
1.48266e+07 das e+07 heißt in diesem fall das die zahl anstatt 1.48266 14826600 ist (unformatiert);
Jedenfalls, wüsst ich trotz allem noch nicht so genau wie ich das einlesen soll, da sich die werte ja auch ändern;


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:08 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