[Delphi] 1e char in een string vervangen

[Anoniem: 38764]

Weet iemand hoe ik van een string de 1e char kan veranderen.
Ik heb in een string een partnr 000001234 staan.
Nu moet de 1e nul vervangen worden door een N.

[Anoniem: 18091]

gewoon met een substring functie het eerste karakter weghalen. en dan een N d'r voor plakken.

[Creepy]

of op deze manier: stringvar[1]:='N';

Zolanf je het stringtype van Delphi gebruikt kan dat niet misgaan (mits de lengte van de string 1 of groter is natuurlijk)

[Anoniem: 50813]

In VB zou ik hetvolgende doen

code:

strBla = "N" & mid(strBla,2)

Ik weet dat Object Pascal ook een mid functie heeft, dus dan hoef je alleen maar even de syntax te checken...

[bobo1on1]

code:

mid(sting,1) := 'N';

Zoiets?

Ik geloof eigenlijk dat het middle is, maar dat staat wel in de help

[RickN]

Come on guys, Creepy's suggestie is gewoon de goede, alle andere zijn gewoon hopeloos inefficient. String indexing is gewoon standaard in Delphi en dat is precies wat je hier nodig hebt.

edit:

Oei, 3 keer gewoon in 2 zinnen....

[Creepy]

String indexing zat al standaard in Pascal, dus ook in Delphi.

Het zou mis kunnen gaan als je multibyte strings gebruikt maar met het standaard string type van Delphi (var blaat: string) gaat dat allemaal prima

Op maandag 13 mei 2002 13:44 schreef bobo1on1 het volgende:

code:

mid(sting,1) := 'N';

Zoiets?

Ik geloof eigenlijk dat het middle is, maar dat staat wel in de help

Dit gaat niet werken. Mid() geeft nu een string van 1 teken lang terug, en een variabele aan de uitkomst van een functie toekennen gaat volgens mij mis, en als het wel lukt, wordt dus niet de originele string vervangen.

En mid, en middle o.i.d. bestaan in Delphi niet. Maak gebruik van de string indexing van Delphi of desnoods (maar waarom zou je zolang je niet met multibyte strings werkt) van delete en insert.

IN delphi Help -> Delphi help ->Index -> string handling routines geeft alle mogelijke functies om een string mee te bewerken (ook een lading functies die wel werken met multibyte strings).

[Paul]

Op maandag 13 mei 2002 15:16 schreef Creepy het volgende:
En mid, en middle o.i.d. bestaan in Delphi niet. Maak gebruik van de string indexing van Delphi of desnoods (maar waarom zou je zolang je niet met multibyte strings werkt) van delete en insert.

Wat er PRECIES met mid of middle bedoeld wordt weet ik niet, maar gezien de manier warop het hier gebruikt wordt, lijtk eht erop dat het hetzelfde doet als de copy functie.