[nixon232]

Какая-то детская ошибка, уже все голову сломал.
First chance exception at $7541DAE8. Exception class EResNotFound with message 'Resource TScreenFRM not found'. Process ***.ехе

Случается только в релизной компиляции, из-под дебагера все работает.
все Uses Прописаны, ресурсы удалял, компилировал занова, деректива {$R *.dfn} наместе, а

Код:

procedure TForm1.BitBtn1Click( Sender: TObject );
  var
  f: TScreenFRM;
  
  begin
  f:= TScreenFRM.Create(Self);
  f.ShowModal;

  end;

Подозреваю, что это из-за того, что я тестил ITM (встроенный локализатор) Сделал бы бекап, но что уж там теперь.
Как быть сейчас?

[lmikle]

Скорее всего 'съехало' название класса в .dfm файле.
Открой ScreenFRM.dfm и проверь.
Ну и полный ребилд.

[nixon232]

Да нет вроде. Форма маленькая, чисто отладочная. Пересоздать не долго, но уже интересно, что не так

Код:

object ScreenFRM: TScreenFRM
  Left = 0
  Top = 0
  AutoSize = True
  Caption = 
    'caption'
  ClientHeight = 219
  ClientWidth = 568
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 8
    Top = 87
    Width = 254
    Height = 132
    AutoSize = True
    Visible = False
    OnMouseUp = Image1MouseUp
  end
  object lblhint: TLabel
    Left = 0
    Top = 0
    Width = 568
    Height = 81
    AutoSize = False
    Caption = 'caption'
    Color = clSilver
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = False
    WordWrap = True
  end
  object btnLoad: TButton
    Left = 493
    Top = 56
    Width = 75
    Height = 25
    Caption = 'btncap'
    TabOrder = 0
    OnClick = btnLoadClick
  end
end

[nixon232]

Все куда хуже, чеи я думал. Я не могу создать в проекте форм, даже пустых. File > New>VCL Form > F9 >"Resource TForm2 not found' В других проектах все создается
Что это за бред тогда?

[lmikle]

У тебя там в dfm съехал Caption на другую строку.
Попробуй это поправить и проверить.

[NumLock]

Сообщение от nixon232

{$R *.dfn}

а должно быть {$R *.dfm}

[nixon232]

Сообщение от NumLock

а должно быть {$R *.dfm}

Конечно же это опечатка тут, в проекте DFM, извиняюсь.

Сообщение от lmikle

У тебя там в dfm съехал Caption на другую строку.
Попробуй это поправить и проверить.

DFM, тут не причем, как я писал выше, при попытке создать новую форму в этом же проекте, получаю ту же ошибку на новую (пустую) форму.
Строки он так всегда переносит, а длинные даже так переносит

Код:

caption=
'abc' +
'def'

Проблему решил удалением DPOJ. Но учтите, что новый DPOJ создается пустым, директории нужно прописывать самому (даже дефолтные)
Может кому пригодиться