AW
Я пытался заюзать докер ,но это было ночью , а потом забыл про него (плюс ссдшка забилась )
Size: a a a
2020 May 21
АТ
Здравствуйте, подскажите, пожалуйста, создаю свою процедуру, но когда запускаю пишет что не может найти edit
АТ
Описываю так
pocedure f1() ;
Begin
Edit1. Text:=''
End;
pocedure f1() ;
Begin
Edit1. Text:=''
End;
VA
Описываю так
pocedure f1() ;
Begin
Edit1. Text:=''
End;
pocedure f1() ;
Begin
Edit1. Text:=''
End;
тебе нужен метод, чтобы иметь доступ к полям формы
те перенеси свою процедуру в объявление формы
те перенеси свою процедуру в объявление формы
АТ
тебе нужен метод, чтобы иметь доступ к полям формы
те перенеси свою процедуру в объявление формы
те перенеси свою процедуру в объявление формы
Не подскажешь как?
VA
Не подскажешь как?
type
TForm1 = class(TForm)
public
procedure f1;
end;
procedure TForm1.f1;
begin
Edit1.Text := '';
end;
АТ
type
TForm1 = class(TForm)
public
procedure f1;
end;
procedure TForm1.f1;
begin
Edit1.Text := '';
end;
Спасибо
SB
Пробовал crc8 в онлайн ,все способы ,пробовал lrc и модбас ascii crc
XOR пробовал? Самая простая, ненадежная и популярная контрольная сумма.
AW
Да пробовал ,не подходит
AW
Пробовал модбас ascii ,суммирование ,тоже не подходит
AW
Пробовал просто суммирование , в кодировке Аски и в хексах
AW
Прогонял в онлайн калькуляторе срс 8 ,тоже нет моего срс
AW
Там множество срс 8
SB
Ну тогда только дизассемблером
AW
Да я в нём вообще не силен , как в школе по физкультуре,когда доляку говорят подтянуться хоть раз ,а ты обосрался
AW
Дохляку *
AW
Вообще я ещё раз в идеру про ,засуну и поищу
AW
Думаю нет ничего сложного разобраться в синтаксисе ассемблера .
SB
Я тоже не силен, но за пару дней возни с Ida получалось довольно сложный код разобрать