casa
Top.Mail.Ru Yandeks.Metrika
Forum: "Principale";
Archivio attuale: 2002.01.08;
Scarica: [xml.tar.bz2];

giù

AIUTO !!! Trova rami simili


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

function SelectChars (s: ShortString; a: Integer; b: Integer): ShortString;
var
i: intero;
ts: ShortString;
tp: PChar;
iniziare
ts: = "";
StrPCopy (tp, s);
per i: = a a a + b do ts: = ts + tp [i];
Risultato: = ts;
fine;

Questa funzione non può digerire frasi molto lunghe. (Funzione) immediatamente alla vista di frasi lunghe uccide il mio prog.
Come posso risolvere questo ???
per presto GRAZIE !!!



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

Bene, perché usare ShortString
usare String



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

Con il prog String muore anche io, chiaramente non provo nient'altro, può esserci un'altra funzione o opzione come strappare quello che ti serve dal testo ???



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

1. La memoria per PChar non è allocato.
2. Perché PChar è qui?
3. Perché preoccuparsi di questa funzionalità? Se sta copiando una sottostringa, allora
function Copy (S; Index, Count: Integer): string;



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

Ah ... mi hai frainteso!



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

E cosa non hanno capito? Perché tutto questo business è necessario, spiega?



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

Bene, diciamo che ho un pezzo di testo lungo e ho bisogno di controllare o incollare solo le prime due lettere.
-memo1.lines.add (SelectChars ("long text chunk", 0,1))
Vale a dire, come si capisce, nel memo devono essere immesse solo due lettere, che iniziano con 0 e finiscono con 1, e questa funzione funziona bene, ma non con un testo lungo, il limite è da qualche parte nei caratteri 255, ma quello che faccio è il limite.



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

memo1.lines.add (Copia ("un pezzo di testo lungo", 1,1)) - beh, cosa c'è di così scomodo per te? facendo quello che ti serve, e senza ulteriori "fronzoli"



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


sulla funzione di copia già detto.
e nel tuo, oltre agli errori specificati da 5, viene descritta la stringa di ritorno,
e Risultato - PChar



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

GRAZIE MOLTO GRAZIE PER AIUTO !!! Ora tutto funziona come dovrebbe.



Pagine: 1 tutto il ramo

Forum: "Principale";
Archivio attuale: 2002.01.08;
Scarica: [xml.tar.bz2];

al piano di sopra









Memoria: 0.83 MB
Ora: 0.032 c
3-21972
wetnose
2001-12-06 08:30
2002.01.08
FIB + + generatori


1-22174
chva
2001-12-21 00:50
2002.01.08
Pausa nel lavoro


1-22206
T2
2001-12-16 07:11
2002.01.08
Allinea il campo


7-22441
ulysses
2001-09-19 20:31
2002.01.08
Delphi 5 Ent non è installato normalmente in Win2k Pro


1-22248
Leviathan
2001-12-17 13:07
2002.01.08
Delphi prende in giro !!!





afrikaans albanese Arabic armeno Azero basco bielorusso Bulgarian catalano Cinese (semplificato) Cinese (tradizionale) croato Ceco danese Dutch Inglese estone filippina Finnish Francese
galiziano georgiano Tedesco greco Creolo haitiano ebraico hindi ungherese islandese Indonesian irlandese Italiano Giapponese Korean lettone lituano macedone Malay maltese Norwegian
persiano polacco Portoghese rumeno Russian serbo Slovak sloveno Spagnolo swahili Swedish Thai turco ucraino Urdu vietnamita gallese yiddish bengalese bosniaco
Cebuano esperanto Gujarati Hausa Hmong Igbo giavanese kannada khmer lao latino maori marathi mongolo nepali punjabi somalo tamil telugu Yoruba
zulù
Английский Francese tedesco italiano portoghese russo spagnolo