Недавно добавленные исходники

•  DeLiKaTeS Tetris (Тетрис)  1 743

•  TDictionary Custom Sort  4 300

•  Fast Watermark Sources  3 983

•  3D Designer  6 154

•  Sik Screen Capture  4 233

•  Patch Maker  4 781

•  Айболит (remote control)  4 709

•  ListBox Drag & Drop  3 825

•  Доска для игры Реверси  90 923

•  Графические эффекты  5 025

•  Рисование по маске  4 067

•  Перетаскивание изображений  3 390

•  Canvas Drawing  3 722

•  Рисование Луны  3 496

•  Поворот изображения  3 035

•  Рисование стержней  2 646

•  Paint on Shape  2 036

•  Генератор кроссвордов  2 818

•  Головоломка Paletto  2 223

•  Теорема Монжа об окружностях  2 936

•  Пазл Numbrix  1 981

•  Заборы и коммивояжеры  2 582

•  Игра HIP  1 598

•  Игра Go (Го)  1 526

•  Симулятор лифта  1 812

•  Программа укладки плитки  1 552

•  Генератор лабиринта  1 928

•  Проверка числового ввода  1 688

•  HEX View  1 867

•  Физический маятник  1 694

 
скрыть


Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Delphi Sources

Изменение данных в Delphi 2 (BDE)



Автор: Rob Edgar

...из исходного кода VCL я обнаружил, что при назначении значения DB-полю, имеющему строковый тип, значение "проходит" через функцию ANSItoNative, что может привести к изменению (порче) ASCII-данных. Вот так...

Как 16-, так и 32-битные версии IDAPI.CFG устанавливаются с драйвером языка Paradox 'ascii'.

Я создал простое приложение, записывающее в db-поле значения ASCII в диапазоне 0-255 и затем проверяющее их на предмет появившихся различий..... различия между 16- и 32-битной версией не так велики... для примера... в первых 130 значениях получается следующее преобразование:

 16-бит: 21->182 22->167 31->33 130->128
 32-бит:                        130->128
Очевидно достаточно просто "исправить" 32-битные приложения, чтобы добиться такого же результата, что и получаемые 16-битными приложениями, НО я не уверен что решив проблему на моем PC, я решу ее у остальных пользователей, поскольку могут отличаться установки, драйверы языка... и пр.

После того как я проверил все возможные варианты, я составил таблицу и занес туда пять возможных значений, которые могут отличаться под Delphi2 и Delphi1:

 Значение ASCII    Delphi1     Delphi2
       21            182         21
       22            167         22
       33             31         33
      132            102        132
      255            121        255




Похожие по теме исходники

Изменение цвета изображения

Экспорт баз данных в Excel

База данных "Книжный магазин"

База данных Видеофильмов

 

База данных "Школа"

База данных без BDE

База данных студентов

Фильтрование данных

 

Pevrica (сжатие данных)

Delphi Magazine

Tetris DelphiX

Quake Delphi Sources

 

Delphi MMOG

Delphi Яндекс Директ

Delphi to HTML Converter

Проверка знаний Delphi

 

Is Delphi Dying Monitor

Autosave Delphi 7

BDE Errors List

БД без BDE

 

WebDezign Formulare




Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software. Delphi World FAQ

Группа ВКонтакте