Como se puede programar directamente???

[Descendents]

No se si lo que te estas refiriendo es esto por ejemplo

  Procedure CreateButton;
  var NewButton : TButton;
  begin
    NewButton := TButton.create(self);

    with NewButton do
      begin
        Name := 'Button1';

        Top := 30;
        Width := 100;
        Left := 5;

        Parent := self;

        Caption := 'Run-time button!';
      end;
  end;

[[Lepe]]

La lógica impera en todo asunto, Si tienes una caja de texto, no sería buena idea abrir un fichero, recorrerlo y despues cerrarlo en el evento OnKeyPress de esa caja de texto (Tedit). En este caso, abriríamos el fichero en el OnCreate del Form, lo guardamos en una variable temporal y cerramos el archivo; en el evento Onkeypress del TEdit, simplemente recorremos la variable temporal buscando lo que necesitemos.

Este ejemplo es obvio, en otros casos no se ve tan claramente, y menos cuando tenemos ordenadores de 3 o 4 Ghz, discos duros de 7.200 rpm y DMA que son capaces de abrir el fichero y recorrecorlo en un plis plas. De aquí sale la famosa frase "En el ordenador donde programo funciona bien, pero en el ordenador del cliente funciona muy lento".

El que mejor enseña es la experiencia, así que codifica, haz pruebas y pregunta cosas concretas, te iremos respondiendo.

Un saludo