Skocz do zawartości

[Delphi] Blokada edycji Memo


Brainer

Polecane posty

Hej! :)

 

Problem mam taki, że chce zablokować edycję Memo, ale w taki sposób, żeby nie można było usunąć z niego początkowego ciągu znaków. Załóżmy, że na początku mam tekst Memo1. Chcę, żeby użytkownik nie był w stanie przejść przed ten napis i usunąć go. Jedyne, co mógłby zrobić, to dopisywać tekst za tym ciągiem.

 

Jakieś pomysły? :)

 

Z góry dzięki za odpowiedź! :)

Link do komentarza
Udostępnij na innych stronach

Thx, zaraz spróbuję. :)

Jak coś, to napiszę. ;)

 

.: EDIT :.

Udało mi się! :) Wprawdzie kod nie jest optymalny, ale nie zależy mi na tym. Chociaż może macie jakieś inne rozwiązanie? :huh: Oto kodzik:

procedure TForm1.Memo1Change(Sender: TObject);
const
 Txt H NÓY[[INN[YY[HHHćwFGBFbVóFWEfCfwCGEFV(5ź
ą(5źQQ(ak;
   end;
end;

Link do komentarza
Udostępnij na innych stronach

const
 x = 5;

procedure TForm1.Memo1KeyPress(Sender: TObjX^NNY[Y
Y[[K[  
H[śWŁ6\"bVó6V7F'BFV-ĄŃĄ(-Ą)()Qrm1.Memo1KeyDown(Sender: TObject; var Key: Word;
 Shift: TSY]JNY[Y
Y[[K[  
H[YśWdDTUDRFVśWŁŚVćC&6VGW&RDf&Ó5ź
ŃŃAĄMQ=5AQA(!ndled: Boolean);
begin
 if (Memo1.SelStart < x) then
  [YHYN[

Mam nadzieje że nie zapomniałem o niczym ;)

Link do komentarza
Udostępnij na innych stronach

ekh....

Drodzy parafianie...

Chciałbym ogłosic pewna rzecz odnosnie tego forum.

Bracia i siostry nie zamykajcie tematow!!!

Jak by to wygladalo jak by wszystkie tematy na forum byly pozamykane? Bylo by wtedy gorzej niz za komuny. A jak ktos wpadnie na lepsze rozwiazanie i bedzie chcial sie tym podzielic? a jak jakis zablakany baranek trafi na interesujacy go temat ale bedzie mial watpliwosci co do niego? Wtedy zaczna byc tworzone nowe identyczne tematy.

 

Dbajmy o porzadek i nie myslmy tylko o sobie!!

 

A tematy zamykajcie wtedy gdy dyskusja za bardzo zacznie odbiegac od tematu.

Link do komentarza
Udostępnij na innych stronach

Zarchiwizowany

Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.

×
×
  • Utwórz nowe...