как реализовать смещение в richedit'e?подробности внутри

[nuevegramodelamor]

Подробности в прикреплённом файле)
Для тех кому лень качать...Есть программа для умножения дробных чисел столбиком и последующем выводом результата в ричедит...В ричедите поставил выравнивание по правому краю...А как сделать поразрядный сдвиг влево?

[Скандербег]

А как выглядит "поразрядный сдвиг влево" применительно к RichEdit?

[nuevegramodelamor]

ну вот умножение чисел:
____33,33
___*
____12,12
-----
_____6666
____+
____3333
____+
___6666

как сделать что бы в ричедите тоже смещались результаты?

[Скандербег]

Самое простое - установить в RichEdit фиксированный шрифт (Courier New) и добавлять справа в строке результата столько пробелов, сколько нужно для смещения.

[nuevegramodelamor]

Сообщение от Скандербег

Самое простое - установить в RichEdit фиксированный шрифт (Courier New) и добавлять справа в строке результата столько пробелов, сколько нужно для смещения.

не работает...только что для теста написал
sRichEdit1.Lines.Add(result[i]+' ') и всё равно впритык к правому краю)

[Скандербег]

В RichEdit концевые пробелы не работают (он их удаляет), а Memo их нормально отрабатывает.
В RichEdit можно еще вместо пробелов ставить точки. RichEdit их не сможет игнорировать.
Но неизвестно, насколько такое приемлемо в этой задаче.

[Скандербег]

Можно поступить "наоборот". Выравнивание влево. Сдвиг множителей сделать, допустим, на 15-20 пробелов, а каждый из результатов на один пробел меньше. Тогда и RichEdit прокатит.

[nuevegramodelamor]

спасибо использовал мемо)всё работает,но вот беда,есть странные пустые строки((
может кто посмотреть в чём причина

[Скандербег]

for i:=1 to length(num2) do  begin
   if num2[i]<>',' then  begin
    arraynumStr[i]:=num2[i];
    arraynumInt[i]:=strtoint(arraynumStr[i]);
    result[i]:=floattostr(arraynumInt[i]*num1T);
   end;
 end;
end;

Из-за условия num2[i]<>',' в массиве result (лучше не использовать зарезервированные слова) остаются дырки, которые и приводят к пустым строкам в Memo и RichEdit.
Конечно, вместо статического массива здесь напрашивается динамический строковый массив. Например TStringList.

[nuevegramodelamor]

спасибо)сейчас почитаю про динамические массивы)а-то не работал с ними