Воскресенье, 19.05.2024, 02:32
Приветствую Вас Гость | RSS
Главная | Некоторые справочные данные по работа с Word и Ecsel | Регистрация | Вход
Меню сайта
Вход на сайт
Поиск
Календарь
«  Май 2024  »
ПнВтСрЧтПтСбВс
  12345
6789101112
13141516171819
20212223242526
2728293031
Друзья сайта
  • Официальный блог
  • Сообщество uCoz
  • FAQ по системе
  • База знаний uCoz
  • Статистика

    Онлайн всего: 1
    Гостей: 1
    Пользователей: 0
    Делаем сами

    Переменные строковые и числовые

    Рис.1

     

    Как присвоить новое имя диаграмме в Ecsel 2003

    1. Выделить диаграмму ЛКМ

    2. Выбрать  пункт меню Диаграмма/ Тип диаграммы

    3. Выбрать "Нестандартные" (рис.1)

    3. Выбрать " Добавить" (рис2.) 

    4. Ввести нужное имя диаграммы в строку "название" (рис3)

     

    Код копирования диаграммы из книги Ecsel в документ Word

     begin

          MsExcel.WorkBooks[1].Sheets.Item[List].Select;

          MsExcel.ActiveSheet.ChartObjects[Gr].Activate;

          MsExcel.ActiveChart.ChartArea.Copy;

          MsWord.Documents.Item(Pr).Activate;

          MsWord.Selection.Paste;

    End;

    Где  List- имя листа в книге Ercel,

            Gr- имя диаграммы в книге Ecsel

           Pr-имя документа Word

     

    На Рис.2 приведен пример копирования. На рис. слева изображена диаграмма в книге Ecsel, справа в документе Word. 

    Рис.2

     

    Простейшее окно вывода

    procedure TForm1.Button1Click(Sender: TObject);
    
     begin
    
     ShowMessage('Простейшее окно');
    
     end; 

     

    Оператор If  Then Else

    Еще некоторые варианты записи условий

    If (Prov = 'GG') and (Prov1 = 'AA') then   // для строковых переменных

    If aa = 2 or bb - 4  then   // для числовых переменных

     

    Оператор цикла For. Досрочное завершение цикла по условию.

     

    Работа с датой и временем

    Конструктор сайтов - uCozCopyright MyCorp © 2024