limpiar todos los valores del formulario

[__cadetill]

Esto no lo puedes hacer en diseño?

Posteado originalmente por cisterpe
Edit1.BiDiMode := bdRightToLeft;
Edit2.BiDiMode := bdRightToLeft;
Edit3.BiDiMode := bdRightToLeft;
....
Edit65.BiDiMode := bdRightToLeft;
// fin alineacion a la derecha

Si no es así, vamos a reducir las lineas (aprovechando que todos se llaman igual menos en el número)

var
  i : integer;
begin
  for i:= 1 to 65 do
  begin
    TEdit(FindComponent('Edit' + IntToStr(i))).BiDiMode := bdRightToLeft;
  end;

mejor, verdad? Lo que hacemos es buscar el componente mediante FindComponent casteandolo a un TEdit (que sebemos de antemano que lo es) y acceder a la propiedad que queremos.

Bueno, con lo que respecta a la Query, cuando dices que no te funciona... a qué te refieres? no hace el Open? hace el Open pero no se visualizan valores? hace el Open, visualiza valores pero son erroneos? Tienes la Query enlazada a algún componente DataAware para visualizar sus valores? La tierra es redonda? Mi mamá me mima?