Mal angenommen, du kennst den Code zum Herausfinden der aktuellen Zeile (Ich kenne ihn nicht, dürfte es aber in der
DP geben), dann sollte dein OnSelectionChange Ereigniss in etwa so aussehen:
Delphi-Quellcode:
if (GetLine = 0) or (GetLine = 1) or (GetLine = 2) ... then//GetLine ist die Procedure zum herausfinden der Zeile und Zeile 0 ist die 1. Zeile
begin
Memo1.ReadOnly := true
end
else
begin
Memo1.ReadOnly := false;
end;
Florian