/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Flere linier i en string.
Fra : Jens Christian Hille~


Dato : 08-06-01 17:03

Hej NG!
Jeg fandt ud af noget smart her forleden dag. Jeg ved ikke, om det er noget
man bare _ved_! Anyway, jeg fandt ud af, hvordan man laver flere linier i
sin Label, sit hint eller andet der skal bruge en string. Fremgangsmåden er
således:

I FormCreate proceduren skriver du følgende:

Label1.Caption := 'Linie 1' + chr(13) + 'Linie 2' + chr(13) + 'Linie 3';
Så skal Label1.Caption bare ændres til hvad man nu skal bruge det til...

Venlig hilsen
Jens Christian Hillerup



 
 
Thomas P (08-06-2001)
Kommentar
Fra : Thomas P


Dato : 08-06-01 17:36

> Jeg fandt ud af noget smart her forleden dag. Jeg ved ikke, om det er
noget
> man bare _ved_!

Jo -

> Label1.Caption := 'Linie 1' + chr(13) + 'Linie 2' + chr(13) + 'Linie 3';
> Så skal Label1.Caption bare ændres til hvad man nu skal bruge det til...

Jeg skal ikke begynde og pille i normaliteten af indlæg her - det er vel i
orden at poste tips, men dog lidt usædvanligt. I stedet vil jeg komme med en
kommentar til din opdagelse. Det har altid været ganske vist at ascii
karakteren, 13, fungerer som >enter< - derfor vil jeg betegne det som logisk
at man ved at sige " string := 'Linie et'#13'Linie to'; " får to liniers
tekst. Jeg kan ikke helt huske mine ascii tabeller så godt, men jeg ved da
at det er muligt at indsætte intet mindre end 255 forskellige nummer-værdier
i sine string - ikke sikkert de alle sammen giver noget resultat (fx ikke
#27, der jo er escape), men sikkert og vist er det dog at det er ganske
vidst.

--
- Thomas
~~~~~~~~
.... http://www.FlowCode.f2s.com - where code flows
.... mailto:blomme@post.com - where email goes



Christian Iversen (09-06-2001)
Kommentar
Fra : Christian Iversen


Dato : 09-06-01 18:03

> > Jeg fandt ud af noget smart her forleden dag. Jeg ved ikke, om det er
> noget man bare _ved_!
>
> Jo -

Korrekt.. =)

>
> > Label1.Caption := 'Linie 1' + chr(13) + 'Linie 2' + chr(13) + 'Linie 3';
> > Så skal Label1.Caption bare ændres til hvad man nu skal bruge det til...
>
> Jeg skal ikke begynde og pille i normaliteten af indlæg her - det er vel i
> orden at poste tips, men dog lidt usædvanligt. I stedet vil jeg komme med
en
> kommentar til din opdagelse. Det har altid været ganske vist at ascii
> karakteren, 13, fungerer som >enter< - derfor vil jeg betegne det som
logisk
> at man ved at sige " string := 'Linie et'#13'Linie to'; " får to liniers
> tekst. Jeg kan ikke helt huske mine ascii tabeller så godt, men jeg ved da
> at det er muligt at indsætte intet mindre end 255 forskellige
nummer-værdier
> i sine string - ikke sikkert de alle sammen giver noget resultat (fx ikke
> #27, der jo er escape), men sikkert og vist er det dog at det er ganske
> vidst.
>

Jamen du har jo, næsten, helt ret... =)

Den kode der betyder "linieskift" på Win32-platformen er #13#10 (eller
$0D0A)

Hvis man glemmer #10, ser teksten sjov ud i diverse text-controls.. f.eks.
TMemo.

Desuden er der 256 forskellige ASCII-værdier, 0..255;

De første 32 er reserverede værdier (linieskift, escaped chars, o.s.v.).
0..31;

Håber det kan bruges!

--
Regards, Christian Iversen [FIDUSO]
-----BEGIN GEEK CODE BLOCK-----
d- s a-- C++++ U P L E- W+++ N+++ o K- w++++ O! M-- V? PS++
PE++ Y+ PGP t+ 5? X++++ R tv- b++ DI+++ D+ G++ e>+++++ h!
------END GEEK CODE BLOCK------



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408849
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste