Ĺadny brzuch
Witam mam problem bo chce zrobic zeby po kliknieciu na shtml pokazywal mi sie kod z danym kolorem w memo1:D
Tak wyglada kod shtml:
memo1.Clear; memo1.Lines.Add('<html>'); memo1.Lines.Add('<head>'); memo1.Lines.Add('<title></title>'); memo1.Lines.Add('</head>'); memo1.Lines.Add(''); memo1.Lines.Add('<body>'); memo1.Lines.Add('</body>'); memo1.Lines.Add('</html>');
probowale przez deklarowanie zmienych
var Font:TFont;
ale tez mi nie wychodziło:( jak to zrobie please thx z gory - nie dziwcie sie jestem poczatkujacy
Użytkownik inf16 edytował ten post 23 kwiecień 2005, 12:59
Nie jarze. Jaki kolor? Gdzie ma sie pokazywac? Jaki kod ?
zamienić TMemo na TRichEdit
Najpierw wytlumacz co chcesz zrobic... moze function color2html(color: tcolor): string; begin Result:='#' + IntToHex(GetRValue(color), 2) + IntToHex(GetGValue(color), 2) + IntToHex(GetBValue(color), 2); end;
chce zrobic zeby po kliknieciu na button pokazywal mi sie kod ktory jest przypisany buttonowi kolorem czerwony w memo1
Użytkownik inf16 edytował ten post 23 kwiecień 2005, 13:11
chce zrobic zeby po kliknieciu na button pokazywal mi sie kod ktory jest przypisany buttonowi kolorem czerwony w memo1
Proponuję użyć SynEdit.
nie ma takiej możliwości memo nie obszy ci kolorów :(
tak jak ci sugerował Misiek RichEdit ;)
to wlassnie tak zrobilem:) tylko teraz mam problem z deklaracja font:
var Font:TFont; begin Font:=TFont.create; i teraz nie wiem co dalej:(
zapewne bedzie [Font.] i teraz co powinno byc potym ??
Użytkownik inf16 edytował ten post 23 kwiecień 2005, 13:24
czekaj chodzi ci o wstawienie do memo tagu koloru? Tzn np masz kod <Body BGCOLOR=" i chcesz wstawic tag koloru np. #000000 ? Jesli tak to powyzej dodalem kod, wiec uzyj funkcji color2html(clBlack) to zwroci tekst '#000000' jak uzyjesz color2html(clWhite) to zwroci '#ffffff' ... o to chodzi?
czekaj chodzi ci o wstawienie do memo tagu koloru? Tzn np masz kod <Body BGCOLOR=" i chcesz wstawic tag koloru np. #000000 ? Jesli tak to powyzej dodalem kod, wiec uzyj funkcji color2html(clBlack) to zwroci tekst '#000000' jak uzyjesz color2html(clWhite) to zwroci '#ffffff' ... o to chodzi?
to masz do tego celu komponent o nazwie: SynEdit
http://www.torry.net...nedit&Title=Yes
to masz do tego celu komponent o nazwie: SynEdit
http://www.torry.net...nedit&Title=Yes
Jesli chodzi tylko o wybrany fragment to RichEdit lub SynEdit. Jak o caly tekst to Memo1.Font.Color:=clRed;
ja bym to zrobił tak:
wszystkie polecenia html wzucił w tablice następnie przeszzukiwał richedita pos i po znalezieniu bym kolorował składnie
No brawo twój pomysł po kilku przeszukaniach zmusił by komputer do restartu bo niedało by się już go użyać z przeciążenia pamięci.
Jesli chodzi tylko o wybrany fragment to RichEdit lub SynEdit. Jak o caly tekst to Memo1.Font.Color:=clRed;
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Tak wyglada kod shtml:
memo1.Clear; memo1.Lines.Add('<html>'); memo1.Lines.Add('<head>'); memo1.Lines.Add('<title></title>'); memo1.Lines.Add('</head>'); memo1.Lines.Add(''); memo1.Lines.Add('<body>'); memo1.Lines.Add('</body>'); memo1.Lines.Add('</html>');
probowale przez deklarowanie zmienych
var Font:TFont;
ale tez mi nie wychodziło:( jak to zrobie please thx z gory - nie dziwcie sie jestem poczatkujacy
Użytkownik inf16 edytował ten post 23 kwiecień 2005, 12:59
Nie jarze. Jaki kolor? Gdzie ma sie pokazywac? Jaki kod ?
zamienić TMemo na TRichEdit
Najpierw wytlumacz co chcesz zrobic... moze function color2html(color: tcolor): string; begin Result:='#' + IntToHex(GetRValue(color), 2) + IntToHex(GetGValue(color), 2) + IntToHex(GetBValue(color), 2); end;
chce zrobic zeby po kliknieciu na button pokazywal mi sie kod ktory jest przypisany buttonowi kolorem czerwony w memo1
Użytkownik inf16 edytował ten post 23 kwiecień 2005, 13:11
chce zrobic zeby po kliknieciu na button pokazywal mi sie kod ktory jest przypisany buttonowi kolorem czerwony w memo1
Proponuję użyć SynEdit.
nie ma takiej możliwości memo nie obszy ci kolorów :(
tak jak ci sugerował Misiek RichEdit ;)
to wlassnie tak zrobilem:) tylko teraz mam problem z deklaracja font:
var Font:TFont; begin Font:=TFont.create; i teraz nie wiem co dalej:(
zapewne bedzie [Font.] i teraz co powinno byc potym ??
Użytkownik inf16 edytował ten post 23 kwiecień 2005, 13:24
czekaj chodzi ci o wstawienie do memo tagu koloru? Tzn np masz kod <Body BGCOLOR=" i chcesz wstawic tag koloru np. #000000 ? Jesli tak to powyzej dodalem kod, wiec uzyj funkcji color2html(clBlack) to zwroci tekst '#000000' jak uzyjesz color2html(clWhite) to zwroci '#ffffff' ... o to chodzi?
czekaj chodzi ci o wstawienie do memo tagu koloru? Tzn np masz kod <Body BGCOLOR=" i chcesz wstawic tag koloru np. #000000 ? Jesli tak to powyzej dodalem kod, wiec uzyj funkcji color2html(clBlack) to zwroci tekst '#000000' jak uzyjesz color2html(clWhite) to zwroci '#ffffff' ... o to chodzi?
to masz do tego celu komponent o nazwie: SynEdit
http://www.torry.net...nedit&Title=Yes
to masz do tego celu komponent o nazwie: SynEdit
http://www.torry.net...nedit&Title=Yes
Jesli chodzi tylko o wybrany fragment to RichEdit lub SynEdit. Jak o caly tekst to Memo1.Font.Color:=clRed;
ja bym to zrobił tak:
wszystkie polecenia html wzucił w tablice następnie przeszzukiwał richedita pos i po znalezieniu bym kolorował składnie
No brawo twój pomysł po kilku przeszukaniach zmusił by komputer do restartu bo niedało by się już go użyać z przeciążenia pamięci.
Jesli chodzi tylko o wybrany fragment to RichEdit lub SynEdit. Jak o caly tekst to Memo1.Font.Color:=clRed;