Ĺadny brzuch
Mam program, w którym jest Memo1 i przycisk który ma za zadanie dodać skrypt PHP po kliknięciu. Chciałbym żeby było tak, że po kliknięciu na przycisk do memo doda się tekst:
<?php
$zmienna = "Hello";
echo $zmienna;
?>
A jak narazie dodaje się jako <?php $zmienna = "Hello"; echo $zmienna; ?>. Dodaję to za pomocą Memo1.SelText.
Pytanie: Jak zrobić, żeby przejść do następnej linii w memo i dalej pisać? Chodzi mi o coś podobnego do \n w php.
var file_sl: TStringList; begin file_sl := TStringList.Create; file_sl.LoadFromFile('nazwa_pliku.txt'); Memo1.Lines.AddStrings(file_sl); //nie jestem pewien, co do nazwy tej funkcji. Popatrz, która ma w parametrach "TStrings", lub "TStringList" end;
Ładuje treść z pliku i stara się dodać do Memo1, ale nie pamiętam, czy dobrą nazwę funkcji wpisałem - patrz komentarz. ;-) O coś takiego Ci chodziło?
Nie, nie.
Chodzi mi o to jak mam teraz
Memo1.Seltext:='<?php $zmienna = "Hello"; echo $zmienna; ?>';
żeby było zamiast tych spacji przejście do nowej linijki.
pbnan - jemu chyba chodzilo o dodanie tekstu wieloliniowego z kodu.
Masz 2 opcje: dodawac po linijce, albo dodac jedna linijke ale zawierajaca znaczki #13 i/lub #10, przy czym nie wstawiasz jej jako tekst (w ' ') tylko dodajesz w zadanym miejscu (... + #10 + ...).
Sa to standardowe okienkowe znaki nastepnej linii.
pbnan - jemu chyba chodzilo o dodanie tekstu wieloliniowego z kodu.
Masz 2 opcje: dodawac po linijce, albo dodac jedna linijke ale zawierajaca znaczki #13 i/lub #10, przy czym nie wstawiasz jej jako tekst (w ' ') tylko dodajesz w zadanym miejscu (... + #10 + ...).
Sa to standardowe okienkowe znaki nastepnej linii.
No to mój sposób lekko przerobiony :)
var file_sl: TStringList; begin file_sl := TStringList.Create; file_sl.Add('<?php'); //////////////// file_sl.Add('?>'); Memo1.Lines.AddStrings(file_sl); //nie jestem pewien, co do nazwy tej funkcji. Popatrz, która ma w parametrach "TStrings", lub "TStringList" end;
Dlaczego taki? Ponieważ pamiętam, jakie miałem problemy przy Twoim sposobie, ale to było przy TSynEdit (czy jak to się nazywa). :) Nie wiem, jak przy TMemo, ale wolę uważać.
@f3n3k: zdecyduj się, czy chcesz dodawać, czy zamieniać (seltext)...
Użytkownik pbnan edytował ten post 13 maj 2007, 18:02
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
<?php
$zmienna = "Hello";
echo $zmienna;
?>
A jak narazie dodaje się jako <?php $zmienna = "Hello"; echo $zmienna; ?>. Dodaję to za pomocą Memo1.SelText.
Pytanie: Jak zrobić, żeby przejść do następnej linii w memo i dalej pisać? Chodzi mi o coś podobnego do \n w php.
var file_sl: TStringList; begin file_sl := TStringList.Create; file_sl.LoadFromFile('nazwa_pliku.txt'); Memo1.Lines.AddStrings(file_sl); //nie jestem pewien, co do nazwy tej funkcji. Popatrz, która ma w parametrach "TStrings", lub "TStringList" end;
Ładuje treść z pliku i stara się dodać do Memo1, ale nie pamiętam, czy dobrą nazwę funkcji wpisałem - patrz komentarz. ;-) O coś takiego Ci chodziło?
Nie, nie.
Chodzi mi o to jak mam teraz
Memo1.Seltext:='<?php $zmienna = "Hello"; echo $zmienna; ?>';
żeby było zamiast tych spacji przejście do nowej linijki.
pbnan - jemu chyba chodzilo o dodanie tekstu wieloliniowego z kodu.
Masz 2 opcje: dodawac po linijce, albo dodac jedna linijke ale zawierajaca znaczki #13 i/lub #10, przy czym nie wstawiasz jej jako tekst (w ' ') tylko dodajesz w zadanym miejscu (... + #10 + ...).
Sa to standardowe okienkowe znaki nastepnej linii.
pbnan - jemu chyba chodzilo o dodanie tekstu wieloliniowego z kodu.
Masz 2 opcje: dodawac po linijce, albo dodac jedna linijke ale zawierajaca znaczki #13 i/lub #10, przy czym nie wstawiasz jej jako tekst (w ' ') tylko dodajesz w zadanym miejscu (... + #10 + ...).
Sa to standardowe okienkowe znaki nastepnej linii.
No to mój sposób lekko przerobiony :)
var file_sl: TStringList; begin file_sl := TStringList.Create; file_sl.Add('<?php'); //////////////// file_sl.Add('?>'); Memo1.Lines.AddStrings(file_sl); //nie jestem pewien, co do nazwy tej funkcji. Popatrz, która ma w parametrach "TStrings", lub "TStringList" end;
Dlaczego taki? Ponieważ pamiętam, jakie miałem problemy przy Twoim sposobie, ale to było przy TSynEdit (czy jak to się nazywa). :) Nie wiem, jak przy TMemo, ale wolę uważać.
@f3n3k: zdecyduj się, czy chcesz dodawać, czy zamieniać (seltext)...
Użytkownik pbnan edytował ten post 13 maj 2007, 18:02