My Visual Database — How To Show Original Content ?

Re: How To Show Original Content ?

null@example.com (DriveSoft) — Tue, 06 Nov 2018 23:27:27 +0000

jrga wrote:

Olá, eu coloquei o script acima numa aplicação com sqlite e não funcionou....alguma sugestão? Obrigado.

Please attach your project and describe the problem in more details.

Re: How To Show Original Content ?

null@example.com (jrga) — Tue, 06 Nov 2018 19:33:41 +0000

Olá, eu coloquei o script acima numa aplicação com sqlite e não funcionou....alguma sugestão? Obrigado.

Re: How To Show Original Content ?

null@example.com (DriveSoft) — Mon, 14 May 2018 14:09:47 +0000

Check it out

procedure Form1_TableGrid1_OnCellClick (Sender: TObject; ACol, ARow: Integer);
var
    td : Tdataset ;
begin
    SQLQuery('select * from help_topic where id = '+ Form1.TableGrid1.Cells[0,Form1.TableGrid1.SelectedRow] ,td);
    Form1.Memo1.Clear ;
    Form1.Memo1.Lines.Add ( td.Fields[3].AsString);  //By column number
    Form1.Memo1.Text := ReplaceStr(Form1.Memo1.Text, #10, #13#10);
end;

Re: How To Show Original Content ?

null@example.com (mapcreatormail) — Sun, 06 May 2018 11:43:27 +0000

script.pas

var
    RichEdit: TRichEdit;

procedure Form1_TableGrid1_OnCellClick (Sender: TObject; ACol, ARow: Integer);
var
    td: Tdataset;
begin
    SQLQuery('select * from help_topic where id = ' + Form1.TableGrid1.Cells[0,Form1.TableGrid1.SelectedRow],td);
    Form1.Memo1.Clear;
    Form1.Memo1.Lines.Add(td.Fields[3].AsString);  //By column number
    RichEdit.Lines.Clear;
    RichEdit.Lines.Add(td.Fields[3].AsString);
end;
procedure Init ();
begin
    RichEdit:= TRichEdit.Create(Form1);
    RichEdit.Parent:= Form1;
    RichEdit.Top:= 281;
    RichEdit.Left:= 608;
    RichEdit.Width:= 489;
    RichEdit.Height:= 272;
    RichEdit.Color:= clYellow;
    RichEdit.Font.Name:= 'Courier New';
    RichEdit.Font.Size:= 8;
    RichEdit.ScrollBars:= ssBoth;
end;

begin
    Init;
end.

How To Show Original Content ?

null@example.com (prahousefamily) — Sun, 06 May 2018 07:56:02 +0000

How to set Tmemo Or Script Show Original Content From Database ?
New line,tab Or Etc Help me please Like HeidiSQL Show Content

Example 4.4 Beta Compile Only

Help ME Please !!!