Компонент "Текст"
Проблема вот в чем, в компонент "Текст" встовляю несколько колонок таблицы:
[frxDBDataset1."Ф.И.О"] [frxDBDataset1."Город'] и мне нужно чтобы после
[frxDBDataset1."Город'] была запятая, но только тогда когда есть "Город", а когда нет, то и нет запятой.
[frxDBDataset1."Ф.И.О"] [frxDBDataset1."Город'] и мне нужно чтобы после
[frxDBDataset1."Город'] была запятая, но только тогда когда есть "Город", а когда нет, то и нет запятой.
Комментарии
var
s : string;
begin
s := <frxDBDataset1."Ф.И.О">;
if VarToSTR( <frxDBDataset1."Город'> ) <> '' then
s := s + <frxDBDataset1."Город'> + ',';
TfrxMemoView(Sender).Text := s;
end;
[frxDBDataset1."Ф.И.О"][IIF(<frxDBDataset1."Город'> <> '', ', ' ,'' ][frxDBDataset1."Город']
Пробую через OnBeforePrint получается вот что на первой строке один город на второй строке два на третей три и т.д.
А второй код вызывает ошибку.
А ошибка все равно лезет: ' IIF (<frxDBDataset1."Город"> <> '', ', ', '' ':')' expected
if VarToSTR( <frxDBDataset1."Город"> ) <> '' then
s := s + <frxDBDataset1."Город"> + ',';
А как в этот код добавить еще колонки ну например: "Улицу", "Корпус", "Дом" и т.д. Но только так чтобы они были по порядку.
[frxDBDataset1."Ф.И.О"][IIF(<frxDBDataset1."Город"> <> '', ', ' ,'' [b]<span style='color:red'>)</span>[/b]][frxDBDataset1."Город"]
Большое спасибо заработало.
кусок повторяющегося кода в варианте от gpi
в функцию которую и использовать потом либо в мемо либо в скрипте. И выражение будет выглядеть короче и элегантнее, чем все вышеприведенные варианты.