Mostrando postagens com marcador Criando evento em tempo de execução. Mostrar todas as postagens
Mostrando postagens com marcador Criando evento em tempo de execução. Mostrar todas as postagens

quarta-feira, 25 de novembro de 2009

Criando evento em tempo de execução

Memo.onchange := memo1Change;

procedure TForm1.Memo1Change(Sender: TObject);
begin
panel1.caption:='Conteúdo alterado';
end;