Format of Sym files

All except GUI problems

Format of Sym files

Postby Robert » Mon Jun 17, 2019 8:49 pm

I wish to process the contents of some Sym files.

I used to use the following code to get access to the files:
Code: Select all
PROCEDURE  CheckFile (loc: Files.Locator; fInfo: Files.FileInfo);
  VAR
    st:  Stores.Store;
    conv:  Converters.Converter;
    text:  TextModels.Model;
  BEGIN
    conv  :=  Converters.list;
    WHILE  conv.imp  #  'DevBrowser.ImportSymFile'  DO  conv  :=  conv.next  END;
    Converters.Import (loc, fInfo.name, conv, st);
    text  :=  st(Documents.Document).ThisView ().ThisModel ()(TextModels.Model);
but this no longer works. I need to replace the last line by
Code: Select all
    text  :=  st(Views.View).ThisModel ()(TextModels.Model)

Has something changed, or has my memory failed entirely?
User avatar
Robert
 
Posts: 128
Joined: Sat Sep 28, 2013 11:04 am
Location: Edinburgh, Scotland

Return to BlackBox Framework

Who is online

Users browsing this forum: No registered users and 1 guest

cron