[ArtPortEsp]

Empezado por Casimiro Notevi

Ummm... no sé cómo lo haces

Ni yo tampoco sé que pasa, hice al igual que tu un proyecto :

Código Delphi [-]
unit Unit2;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm2 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
begin
     Edit2.Text := Quotedstr(Edit1.text);
end;

procedure TForm2.Button2Click(Sender: TObject);
begin
     Showmessage(Edit2.text);
end;

end.

Y funciona como debería funcionar, para solucionar el problema de los Querys los cambie por parámetros (que es lo que debería haber hecho desde el principio). Pero es desesperante encontrar un error que no tiene ninguna lógica aparente.