Jak zrobić żeby obrazek, podczas poruszania sie po formie nie migotał
Czy ktoś ma może kod źródłowy do jakiegoś programu który jedzie brute-forcem, kod oczywiście w delphi
Jak zrobić by forma była w pełnym ekranie ??? Wiem że sadzi to lamerswem ale cóż :) ??
Jak zrobić skakanie w platformówce, ja sie męczę z timerami ale mi coś ie idzie(przez cały czas leci w dół) PS staram się zrobić platformówkę bez canvasa :d
MainForm.DoubleBuffered := True;
dzienx
Jak zrobić by forma była w pełnym ekranie ??? Wiem że sadzi to lamerswem ale cóż :) ??
form.borderstyle.bsNone;
form.maximize;
Skakanie:
w on Timer wpisz
const
skok:integer=0;
ustaw Timer na Enabled := false;
gdzies w buttonie wpisz Time1.Enabled:=true;
albo w Form1 on key down
if key=VK_up then
Time1.Enabled:=true;
begin
case skok of
0:begin
Image1.Top:=Image1.Top+50;
Timer1.Interval:=2000;
end;
1:begin
Image1.Top:=Image1.Top+50;
Timer1.Interval:=500;
Timer1.Enalbed:=false;
end;
end;
skok:=(skok+1) mod 2;
end;
sam tego szukałem...
Jeżeli chodzi o skok :
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var
B,C : integer;
begin
If (Key=VK_SPACE) then begin
For B := 0 to 10 do
begin
sleep(30);
Image1.Top := Image1.Top - (B+2);
application.ProcessMessages;
end;
end;
begin
For C := 10 downto 0 do
begin
sleep(30);
Image1.Top := Image1.Top + (C+2);
application.ProcessMessages;
end;
end;
end;
Może i "biedne" ale nic innego nie umiałem wymyślić ...
Dzięki, bardzo mi pomogłeś. Postaram sie jeszcze zrobić tak żeby pod górą zwalniał a na dole .
Czy ktoś ma może kod źródłowy do jakiegoś programu który jedzie brute-forcem, kod oczywiście w delphi
Brute-force to znaczy co? Dopasowywanie do wzorca metodą brute force czy może łamanie hasłeł?
Brute-force to ogólna nazwa metod polegających na sprawdzaniu wszystkich możliwych kombinacji (wykorzystujesz brutalną siłę komputera).