Delphi World - Как во время компиляции модуля определить, под какой версией Delphi она происходит

Delphi World - это проект, являющийся сборником статей и малодокументированных возможностей по программированию в среде Delphi. Здесь вы найдёте работы по следующим категориям: delphi, delfi, borland, bds, дельфи, делфи, дэльфи, дэлфи, programming, example, программирование, исходные коды, code, исходники, source, sources, сорцы, сорсы, soft, programs, программы, and, how, delphiworld, базы данных, графика, игры, интернет, сети, компоненты, классы, мультимедиа, ос, железо, программа, интерфейс, рабочий стол, синтаксис, технологии, файловая система...

Как во время компиляции модуля определить, под какой версией Delphi она происходит

Автор: Vit
WEB-сайт: http://forum.vingrad.ru

Вечный вопрос:
- Что было раньше: компилятор или исходники компилятора?

Используйте

{$IFDEF VERXXX}
...
{$ELSE}
...
{$ENDIF}

Пользуйтесь вот такой таблицей:

Ver80 - Делфи 1
Ver90 - Делфи 2
Ver93 - С Buider 1
Ver100 - Дельфи 3
Ver110 - С Buider 3
Ver120 - Дельфи 4
Ver125 - С Buider 4
Ver130 - Дельфи 5
Ver140 - Дельфи 6
Ver150 - Дельфи 7

procedure TForm1.Button2Click(Sender: TObject);
 const
  Version=
  {$Ifdef Ver80}'Делфи 1';{$EndIf}
  {$Ifdef Ver90}'Делфи 2';{$EndIf}
  {$Ifdef Ver100}'Дельфи 3';{$EndIf}
  {$Ifdef Ver120}'Дельфи 4';{$EndIf}
  {$Ifdef Ver130}'Дельфи 5 ';{$EndIf}
  {$Ifdef Ver140}'Дельфи 6';{$EndIf}
  {$Ifdef Ver150}'Дельфи 7';{$EndIf}
begin
   ShowMessage('Для компилляции этой программы был использован ' + Version);
end;