All Projects FPC fpcprojects fpprofilerfpGUI Lazarus Packages PatchesLazarus CCR Mantis pas2js

View Issue Details

Jump to NotesJump to History
IDProjectCategoryView StatusDate SubmittedLast Update
0021373FPCFVpublic2012-02-25 07:572020-11-15 18:14
Reportertommi boy Assigned To 
PrioritynormalSeverityfeatureReproducibilityalways
Status newResolutionopen 
Platformfpc 2.4.4 fpc 2.6.0 i386OSlinux 
Product Version2.4.4 
Summary0021373: Free Vision for linux platform does not properly display the Russian language.
DescriptionFree Vision for linux platform does not properly display the Russian language. The problem in the module Video, which is used in Free Vision. He is assuming that the source code written in cp437 encoding performs additional (in my case, unnecessary and harmful!) Re-encoding to utf8 in the result, instead of Russian words I see the characters. The request to the developers fix this bug.
Steps To Reproduce1) enter to editor text
     program TFirst;
     uses App, drivers, menus, objects, views;
     type
       TMyApp = object(TApplication)
procedure InitStatusLine; virtual;
       end;

procedure TMyApp.InitStatusLine;
var R: TRect; { хранит границы строки статуса }
begin
  GetExtent(R); { устанавливает R в координаты всего}
                              { экрана }
  R.A.Y := R.B.Y - 1; { передвигает вершину на 1 строку }
                              { выше нижней }
  StatusLine := New(PStatusLine, Init(R, { создает строку }
                                           { статуса }
    NewStatusDef(0, $FFFF, { устанавливает диапазон контекстного }
                            { Help }
      NewStatusKey('~Alt-X~ Выход', kbAltX, cmQuit, { определяет
                                                     элемент }
      NewStatusKey('~Alt-F3~ Закрыть', kbAltF3, cmClose, { другой }
      nil)), { больше нет клавиш }
    nil) { больше нет определений }
  ));
end;


     var
       MyApp: TMyApp;

     begin
       MyApp.Init;
       MyApp.Run;
       MyApp.Done;
     end.
2) compile and run
3) in theory we should see in status bar ~Alt-X~ Выход ~Alt-F3~ Закрыть
but on practice we see not readable characters
Additional InformationPlease, fix this bug, it blocked my program development
TagsNo tags attached.
Fixed in Revision
FPCOldBugId0
FPCTarget
Attached Files

Relationships

has duplicate 0035948 resolvedFlorian Czech characters in console when using Free Pascal textmode IDE 

Activities

Marco van de Voort

2012-02-25 12:52

manager   ~0057079

Free Vision is a dos system that is unaware of unicode.

The assumption that a 1-byte char is equal to a glyph is embedded deep into the system.

tommi boy

2012-02-26 05:52

reporter   ~0057090

Last edited: 2012-02-26 09:00

 Problem reproduced with unicode and one bytes charset like cp1251 and cp866 (we can choose codepage in gnome terminal). I created version of free vision used crt unit instead video unit for my own using, but it very slow draw symbols in terminal. Also crt can't hide cursor.

Anton Kavalenka

2020-10-30 20:37

reporter   ~0126671

As there is still TV/FV fans, please have a look here:
https://bugs.freepascal.org/view.php?id=34905

Issue History

Date Modified Username Field Change
2012-02-25 07:57 tommi boy New Issue
2012-02-25 12:52 Marco van de Voort Note Added: 0057079
2012-02-26 05:52 tommi boy Note Added: 0057090
2012-02-26 09:00 tommi boy Note Edited: 0057090
2012-03-24 13:30 Marco van de Voort FPCOldBugId => 0
2012-03-24 13:30 Marco van de Voort Severity major => feature
2020-10-30 20:37 Anton Kavalenka Note Added: 0126671
2020-11-15 18:14 Florian Relationship added has duplicate 0035948