Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.10.06;
Скачать: CL | DM;

Вниз

Как убрать символы переноса в ячейке StringGrid   Найти похожие ветки 

 
N.Cage   (2013-01-20 10:03) [0]

Здравствуйте! Есть таблица StringGrid в которую юзеры вбивают свои данные, особо ленивые используют буфер содержимое которого иногда содержит символы переноса или другие ненужные символы. Например если скопировать ячейку Excel,а не лишь ее содержимое(выделив вручную). Как убрать эти спецсимволы на этапе вставки или изменения содержимого ячейки грида?


 
Inovet ©   (2013-01-20 10:47) [1]

Если сможешь отличить нужные от ненужных.


 
N.Cage   (2013-01-20 10:59) [2]

Два квадратика чаще всего :-)


 
clickmaker ©   (2013-01-20 11:20) [3]

function ReplaceControlChars(const AStr, ACharsToReplace: string; AReplaceChar: char = #32): string;
var
 c: char;
 i: integer;
begin
 Result := AStr;
 for i := 0 to Length(ACharsToReplace)-1 do
   Result := StringReplace(Result, ACharsToReplace[i], AReplaceChar, [rfReplaceAll]);
end;

ReplaceControlChars(CellContent, #13#10#9);


 
N.Cage   (2013-01-20 11:31) [4]

Спасибо большое!


 
Игорь Шевченко ©   (2013-01-20 14:13) [5]

clickmaker ©   (20.01.13 11:20) [3]

Ты маляр Шлемиль прямо


 
Dimka Maslov ©   (2013-01-20 21:58) [6]

for i := 1 to Length(S) do if S[i] < #32 then S[i] := #32;



Страницы: 1 вся ветка

Текущий архив: 2013.10.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.009 c
2-1358698446
Pcrepair
2013-01-20 20:14
2013.10.06
контрол имеющий пару строка-число


15-1367267405
Юрий
2013-04-30 00:30
2013.10.06
С днем рождения ! 30 апреля 2013 вторник


10-1185454042
savyhinst
2007-07-26 16:47
2013.10.06
Панели инструментов Excel и Word


15-1366559274
UseSynergy
2013-04-21 19:47
2013.10.06
Ищу программистов для стартапа


2-1358524343
Proshka
2013-01-18 19:52
2013.10.06
Строки после обновления