Nach Hause
Top.Mail.Ru Yandeks.Metrika
Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

Nach unten

HILFE !!! Finden Sie ähnliche Zweige


Alligator   (2001-12-17 11:46) [0]

Funktion SelectChars (s: ShortString; a: Integer; b: Integer): ShortString;
war
i: Integer;
ts: ShortString;
tp: PChar;
beginnen
ts: = "";
StrPCopy (tp, s);
für i: = a bis a + b ts: = ts + tp [i];
Ergebnis: = ts;
end;

Diese Funktion kann sehr lange Sätze nicht verarbeiten, da sie bei langen Sätzen sofort mein Prog tötet.
Wie kann ich das beheben ???
danke im Voraus!!!



gek   (2001-12-17 11:51) [1]

Warum ShortString verwenden?
Verwenden Sie String



Alligator   (2001-12-17 12:26) [2]

Da das String-Prog auch stirbt, versuche ich eindeutig nichts anderes. Kann es eine andere Funktion oder Option geben, wie man das herausreißt, was man aus dem Text braucht?



McSimm   (2001-12-17 12:38) [3]

1. Speicher für PChar ist nicht reserviert.
2. Warum ist PChar überhaupt hier?
3. Warum sollte man sich überhaupt mit dieser Funktion beschäftigen? Wenn es eine Teilzeichenfolge kopiert, dann
Funktion Copy (S; Index, Count: Integer): string;



Alligator   (2001-12-17 12:57) [4]

Ah ... du hast mich falsch verstanden!



gek   (2001-12-17 13:01) [5]

Und was haben sie nicht verstanden? Warum ist all dieses Geschäft notwendig, erklären Sie?



Alligator   (2001-12-17 13:34) [6]

Angenommen, ich habe einen langen Text und muss nur die ersten beiden Buchstaben überprüfen oder einfügen.
-memo1.lines.add (SelectChars ("Langtextblock", 0,1))
Das heißt, wie Sie verstehen, sollten in das Memo nur zwei Buchstaben eingegeben werden, beginnend mit 0 und endend mit 1, und diese Funktion funktioniert einwandfrei, aber nicht mit einem langen Text, die Begrenzung liegt irgendwo in den 255-Zeichen, aber was ich tue, ist Begrenzung.



Digitman   (2001-12-17 13:37) [7]

memo1.lines.add (Copy ("ein Stück Langtext", 1,1)) - na, was ist bei dir so unangenehm? tun, was Sie brauchen, und ohne zusätzliche "Schnickschnack"



Mbo   (2001-12-17 13:41) [8]


über die Kopierfunktion schon gesagt.
und in deinen, neben 5 spezifizierten Fehlern, wird der Return Shortstring beschrieben,
und Ergebnis - PChar



Alligator   (2001-12-17 18:38) [9]

DANKE SEHR VIELEN DANK FÜR HILFE !!! Jetzt funktioniert alles wie es sollte.



Seiten: 1 ganze Branche

Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

nach oben









Speicher: 0.83 MB
Zeit: 0.022 c
1-22140
Serg5
2001-12-20 10:17
2002.01.08
Die Frage, ob es möglich ist, die Schrift auf 4-Pixel zu reduzieren, ändert sich, ändert sich (das Programm schwört nicht) und auf dem Bildschirm (Canvas.Font) wird immer noch 8 angezeigt (das minimalste)


7-22444
VS
2001-09-27 07:14
2002.01.08
So kopieren Sie sich, wenn das Programm ausgeführt wird


1-22217
Greenrul
2001-12-16 02:13
2002.01.08
TreeView - ein paar Fragen


1-22082
Chak
2001-12-19 10:07
2002.01.08
So übergeben Sie einen Funktionsparameter an eine DLL.


1-22228
nazgul
2001-12-15 14:28
2002.01.08
Wie das geht?





Afrikanisch Albanien Arabisch Armenisch Aserbaidschanisch Baskisch Weißrusse Bulgarian katalanisch Chinesisch (vereinfacht) Chinesische Tradition) kroatisch Tschechisch Dänisch Dutch Englisch estnisch Philippinisch Finnish Französisch
Galicisch Georgisch Deutsch Griechisch haitian Creole Hebräisch Hindi ungarisch isländisch Indonesian irisch Italian Japanisch Koreanisch lettisch litauisch Makedonisch Malay Maltesisch Norwegian
persisch Polnisch Portugiesisch Rumänisch Russisch serbisch Slovakisch Slowenisch Spanisch Suaheli Swedish Thai Türkisch Ukrainisch Urdu Vietnamesisch Walisisch Jiddisch Bengalisch bosnisch
cebuano Esperanto Gujarati Hausa Hmong igbo Javanisch kannada khmer Laotisch Lateinisch Maorisch Marathi Mongolisch nepali Pandschabi Somalisch Tamilisch Telugu Yoruba
Zulu
Английский Französisch Deutsch Italienisch Португальский Russisch Spanisch