Рефераты - Афоризмы - Словари
Русские, белорусские и английские сочинения
Русские и белорусские изложения
 
У нас есть несколько работ на данную тему. Вы можете создать свою уникальную работу объединив фрагменты из уже существующих:
  1. Языки программирования 21.3 Кб.
  2. Языки программирования, их классификация и развитие 53.5 Кб.
  3. Языки программирования 31.7 Кб.
  4. Языки программирования 1.4 Кб.
  5. Математические методы и языки программирования: симплекс метод 28.6 Кб.
  6. Практика оператора (WINDOWS 95, MICROSOFT WORD 97, MATHCAD, ЯЗЫКИ ПРОГРАММИРОВАНИЯ, ЭЛЕКТРОННЫЕ КНИГИ, VISIO, Norton Utilites 3.0 for Windows 95) 48.7 Кб.
  7. Методический анализ темы "Языки программирования баз данных и СУБД" 60 Кб.

Языки программирования

Работа из раздела: «Программирование и комп-ры»

  Если вам нужно загружать и  сохранять  пользовательские  цвета  из  файла
CONTROL.INI, необходим некоторый  дополнительный  код.  Удалите  только  что
введенные строки и замените пару begin-end  обработчика  события  OnDblClick
следующими строками:

  VAR N, P: Word;
  begin
    WITH TIniFile.Create (‘CONTROL.INI’) DO
       try
       WITH ColorDialog1 DO
         BEGIN
            ReadSectionValues (‘Custom Colors’, CustomColors);
            IF Execute THEN
              BEGIN
              Form1.Color: = Color;
              FOR N: = 0 TO CustomColors.Count-1 Do
                BEGIN
                  P: = Pos (’ = ’, CustomColors [N]);
                 WriteString (‘CustomColors’,
                    Copy (CustomColors [N], 1, P-1),
                    Copy (CustomColors [N], P+1, 255)),
                  END;
                END;
              END;
           finally
           Free;
       END;
  end;
  Теперь следует перейти к началу файла и  добавить  в  оператор  uses  имя
модуля IniFiles (т.е. в начале файла нужно  найти  строку,  начинающуюся  со
слова uses и добавить IniFiles, а затем запятую). В  результате  при  каждом
двойном щелчке на форме пользовательские цвета диалога  Color  (Цвет)  будут
загружаться   из   файла   CONTROL.INI.   Если   добавить    или    изменить
пользовательские цвета и  щелкнуть  на  кнопке  ОК,  изменения  запишутся  в
CONTROL.INI.



ref.by 2006—2022
contextus@mail.ru