Wątek przeniesiony 2014-06-05 19:25 z Delphi i Pascal przez olesio.

Co należy zmienić aby kompilator przyjął VK_RIGHT

0

Witam, mam problem z Lazarusem, gdyż wyrzuca mi błąd przy:

procedure TForm3.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
    if Key=VK_RIGHT then
    begin
      if i<Form1.ListBox1.Items.Count then
      begin
        Form3.Image1.Picture.Loadfromfile(Form1.ListBox1.Items[i]);
        Inc(i);
         end
         else
         begin
         ShowMessage( ' Koniec listy ' );
         end;
          end;

Błąd wygląda następująco:

unit3.pas(47,22) Error: Identifier not found "VK_RIGHT"

dodanie znaczników <code> i <code class="delphi"> - furious programming

0
GeniusNetu napisał(a)

A jeżeli użyję zapisu #27 to będzie dobrze?

Nie, dlatego że zapis #27 oznacza znak o kodzie 27, a argument Key jest typu Word, więc dostałbyś błąd niezgodności typów; Wystarczyło sprawdzić;

Na przyszłość polecam więcej czytać i szukać informacji we własnym zakresie - masz do tego bogatą dokumentację Free Pascala i oczywiście darmowe Google; Poza tym czytaj komunikaty błędów, a jeśli ich nie rozumiesz to Google także posiada dość dobry tłumacz.

1 użytkowników online, w tym zalogowanych: 0, gości: 1