2 spørgsmål..

Hej..

1. Jeg leder efter en komponent eller hvis man kan en metode til at farve den tekst man tilføjer enten til en memo eller richedit..

2. Jeg har læst man kan lægge sine Procedure ind i en ekstern UNIT fil som man kan tilføje under uses men kan ikke rigtig finde ud af det.. Så er der ikke en der kan hjælpe med lidt kode og eksempler...

På forhånd mange tak

SkypeR That\\\\\\'s ME

----------------------------------------------
%49%66%20%79%6F%75%27%76%65%20%74%72%61%
6E%73%6C%61%74%65%64%20%
74%68%69%73%2C%20%79%6F%75%20%6D%75%73%
74%20%62%65%20%62% 6F%72%65%64%2E%2E%2E

Til sp. 1:
Du kan skrive:

Memo1.Font.Color:= Tcolor(clRed);

Red er så farven den skal være (i dette tilfælde rød)

Til sp. 2:
Du kan lave en ny Unit (vælg New ---> Unit) insætte dine procedures her, gemme uniten i Delphi/Lib og derefter bare tilføjre unitens navn (uden endelse .dcu eller .pas) til dine USES.


EDIT: Til sp. 2 kan du evt. kigge her: http://udvikleren.dk/thread.php?techid=2&f=2&t=2030&searchword=komponent

Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------

[Redigeret d. 24/01-05 19:22:20 af Rune Jensen (RoZ)]

procedure MinProcedure(teksttring; send_to:Tedit);
begin
send_to.Text := tekst;
end;

Du kan jo ikke sige at en edit skal være tekst. Du skal sætte edit'ens tekst.





-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ W++ w PS X+ tv+ b D G e- h! !r z--
------END GEEK CODE BLOCK------

Du må huske å tilføye
procedure MinProcedure(teksttring; send_to:Tedit);
under unitens interface.
-------------------------------------
I am AGAINST TCPA!!
[ http://www.againsttcpa.com/ ]
-------------------------------------
Mvh
DiZpel

Hvis ikke det er en owner-drawn (hvilket er noget mere avanceret) TMemo, så kan du ikke.

Du kan i stedet bruge TRichEdit.

1101110100010110000101000001

Du kan bruge TRichEdit.SelAttributes.Color (eller lign.) Det tekst der er valgt vil du derefter kunne manipulere med (i denne situation er det farven). Saa for at farve hver linje kan du lave en for-loop der for hver loop og markere gaeldende linje og farver den!

Jeg ved ikke helt hvilken situation du vil bruge det i, men jeg tror naeppe du kan finde en komponent der kan manipulere en TRichEdit komponent! I stedet kunne du proeve lave din egen tekst edit komponent eller finde en der kan det du oensker paa evt. www.torry.net

Held og Lykke

Tak for svar men jeg kan se jeg skrev det hele lidt for hurtigt.. Det jeg mente i 1. var hvordan man kunne farve tekste på hver sin linje..

2. Det du skrev hviste jeg godt men kan ikke få det til at fungere..

Jeg vil fx. gerne sende flg.

MinProcedure('hehe', Edit1);

Min procedure ser sådan ud.. Procedure(teksttring; send_to:Tedit);
begin
send_to := tekst;
end;

Men det fungere ikke.

SkypeR That\\\\\\\\\\\\\\'s ME

----------------------------------------------
%49%66%20%79%6F%75%27%76%65%20%74%72%61%
6E%73%6C%61%74%65%64%20%
74%68%69%73%2C%20%79%6F%75%20%6D%75%73%
74%20%62%65%20%62% 6F%72%65%64%2E%2E%2E

Det er rigtig men kan du så ikke vise mig hvordan jeg kan bruge denne procedure hvis jeg smider den i en anden UNIT... Det er der jeg ikke kan få det til at fungere



SkypeR That\\\\\\\\\\\\\\'s ME

----------------------------------------------
%49%66%20%79%6F%75%27%76%65%20%74%72%61%
6E%73%6C%61%74%65%64%20%
74%68%69%73%2C%20%79%6F%75%20%6D%75%73%
74%20%62%65%20%62% 6F%72%65%64%2E%2E%2E

[Redigeret d. 24/01-05 19:41:27 af SkypeR]

Du må huske å tilføye
procedure MinProcedure(teksttring; send_to:Tedit);
under unitens interface.
-------------------------------------
I am AGAINST TCPA!!
[ http://www.againsttcpa.com/ ]
-------------------------------------
Mvh
DiZpel

I hvilken af unitsen?

SkypeR That\\\\\\\\\\\\\\'s ME

----------------------------------------------
%49%66%20%79%6F%75%27%76%65%20%74%72%61%
6E%73%6C%61%74%65%64%20%
74%68%69%73%2C%20%79%6F%75%20%6D%75%73%
74%20%62%65%20%62% 6F%72%65%64%2E%2E%2E

Jeg fant ud af det

Nu mangler jeg kun det med at farve hver enkelt linje i en form for memo, kan det ikke lade sig gøre?..

NOTE: Eller en anden component der kan gøre dette...

SkypeR That\\\\\\\\\\\\\\'s ME

----------------------------------------------
%49%66%20%79%6F%75%27%76%65%20%74%72%61%
6E%73%6C%61%74%65%64%20%
74%68%69%73%2C%20%79%6F%75%20%6D%75%73%
74%20%62%65%20%62% 6F%72%65%64%2E%2E%2E

[Redigeret d. 24/01-05 22:02:01 af SkypeR]

Du kan bruge TRichEdit.SelAttributes.Color (eller lign.) Det tekst der er valgt vil du derefter kunne manipulere med (i denne situation er det farven). Saa for at farve hver linje kan du lave en for-loop der for hver loop og markere gaeldende linje og farver den!

Jeg ved ikke helt hvilken situation du vil bruge det i, men jeg tror naeppe du kan finde en komponent der kan manipulere en TRichEdit komponent! I stedet kunne du proeve lave din egen tekst edit komponent eller finde en der kan det du oensker paa evt. www.torry.net

Held og Lykke

Problemet med TRichEdit er at hvis man vælger at farve teksten "hej" rød

og så senere fordi man har tilføjet enu en linje med ordet hej så laver den kun det første om..

Det jeg vil bruge det hele til er til et IRC program og der kunne jeg godt tænke mig at farve nogle linjer

SkypeR That\\\\\\\\\\\\\\'s ME

----------------------------------------------
%49%66%20%79%6F%75%27%76%65%20%74%72%61%
6E%73%6C%61%74%65%64%20%
74%68%69%73%2C%20%79%6F%75%20%6D%75%73%
74%20%62%65%20%62% 6F%72%65%64%2E%2E%2E

[Redigeret d. 25/01-05 17:23:18 af SkypeR]