Solved

TAB!

Posted on 2001-06-07
4
223 Views
Last Modified: 2010-04-06
how do u put a tab characted in a memo?  i want to align my data so i want to display them in between tabs...how do i do this???

tnx!!!
0
Comment
4 Comments
 
LVL 8

Accepted Solution

by:
TOndrej earned 50 total points
ID: 6162812
Set TMemo.WantTabs property to True.
0
 
LVL 27

Expert Comment

by:kretzschmar
ID: 6162845
memo1.lines.add('Before tab'+#9+'after Tab');
0
 
LVL 3

Expert Comment

by:f15iaf
ID: 6167228
This may help:
The program put 9 spaces when user clicks tab button:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
        if(form1.activecontrol=memo1)then
        begin
                if(getkeystate(VK_TAB)<0)then
                memo1.SelText:='        ';
        end;
end;
procedure TForm1.FormCreate(Sender: TObject);
var
        timeout:dword;
begin
        systemparametersinfo(spi_getkeyboardspeed,0,@timeout,0);
        timer1.Interval:=timeout;
end;

end.
0
 
LVL 6

Expert Comment

by:wimmeyvaert
ID: 6170697
Why not using RichEdit instead ?
Than you can set your own tabs like this :

  With RichEdit1.Paragraph do
  begin
    Tab[0] := 90;
    Tab[1] := 150;
    Tab[2] := 200;
    Tab[3] := 250;
  end;


Be sure that WantTabs-property is set to True.
0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
In a recent question (https://www.experts-exchange.com/questions/28997919/Pagination-in-Adobe-Acrobat.html) here at Experts Exchange, a member asked how to add page numbers to a PDF file using Adobe Acrobat XI Pro. This short video Micro Tutorial sh…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

776 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question