Найдено 2 результата

purple_goth
07.06.2012 15:59:54
Форум: Lazarus
Тема: Не работает сравнение символов.
Ответы: 3
Просмотры: 3459

Re: Не работает сравнение символов.

cуть в том что при f=f все ок сравнивается, а при ф=ф нифига не происходит.
unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
ExtCtrls, Buttons;

type

{ TForm1 }

TForm1 = class(TForm)
BitBtn1: TBitBtn;
BitBtn3 ...
purple_goth
07.06.2012 15:30:41
Форум: Lazarus
Тема: Не работает сравнение символов.
Ответы: 3
Просмотры: 3459

Не работает сравнение символов.

уже скурил все темы какие мог. Но проблему решить не могу.
Суть такова! из Edit1 берется символ типа стринг. И сравнивается со списком символов из файла, ниже выводит статистику. Но проблема в том что с кириллицей не происходит ничего, а с латиницей все работает.

Лазарь 0.9.30.4 под Шиндой ...