Всем Салам! Есть код на деллфи, нужно его на питон переквалифицировать.

Question

Всем Салам! Есть код на деллфи, нужно его на питон переквалифицировать.

Как это сделать?
Код ниже:

procedure TForm1.Button1Click(Sender: TObject);
var
List: TStrings;
i: integer;
j: integer;
n: integer;
r: integer;
begin
List:=TStringList.Create;
for i := 192 to 223 do
for j := 192 to 223 do
for n := 192 to 223 do
for r := 192 to 223 do
begin
List.Add(chr(i) + chr(j) + chr(n) + chr(r));
end;
Label1.Caption :='Ñîñòàâëåíî ' + IntToStr(List.Count)+ ' êîìáèíàöèé';
ListBox1.Items.Assign(List);
List.Free;
end;

procedure TForm1.Button3Click(Sender: TObject);
var
k: Integer;
begin
k := ListBox1.Items.IndexOf(Edit1.Text);
Label2.Caption :='Ýòî ' + IntToStr(ListBox1.Items.IndexOf(Edit1.Text)) + ' âàðèàíò';
ListBox1.Selected[k] := true;
end;

#backend #programming #python #russian

0

25.04.2022

10 ответов

6 просмотров

Tishka17

Прям с окошками надо?

0

25.04.2022

Laziz Автор вопроса

максимальное количиество вариаций слова, и добавить это в апи. Допустим ты пишешь русское слово на английской раскладке. Нужно чтобы он распозновал это как русское слово. Других вариантов реализации не вижу

0

25.04.2022

quantum super position

А зачем тебе на питон это

0

25.04.2022

Laziz Автор вопроса

quantum super position
А зачем тебе на питон это

так удобнее

0

25.04.2022

Владимир

Laziz
максимальное количиество вариаций слова, и добавит...

Что-то не уловил идею

0

25.04.2022

Kan

Laziz
так удобнее

Чем? Если ты питон не знаешь?

0

25.04.2022

Laziz Автор вопроса

Владимир
Что-то не уловил идею

например ты пишешь слово привет на английской раскладке, то есть ghbdtn. Программа должна распознать это слово как привет. Есть всего 48 наименований объектов, и когда человек набирает их должна выходить подсказка.

0

25.04.2022

Владимир

Laziz
например ты пишешь слово привет на английской раск...

А, то есть не все слова русского языка

0

25.04.2022

Laziz Автор вопроса

Владимир
А, то есть не все слова русского языка

да

0

25.04.2022