(07-06-2021, Saat: 16:35)Hayati Adlı Kullanıcıdan Alıntı: Kusura bakmayın anlamak için soruyorum, size sadece x değişkenin değeri lazımsa onu(x'i) global (Form1: Tform1; satırının altına) tanımlayınca işiniz görülmüyor mu? Sonrada
Edit1.Text:=IntToStr(x);

(07-06-2021, Saat: 10:43)mr.irregularr Adlı Kullanıcıdan Alıntı: herkese merhaba 

eksiğim olursa düzeltin kusuruma bakamayın delphide yeniyim bir türlü başarılı olamadım

şimdi bizim bir formumuz var bu formun içine bir sayı listesi gömüp bu sayı listesinden her hangi bir sayıyı ekrandaki edit alanına yazarak programı kapatmak istiyoruz toparlamak gerekirse 
elimde bir form var formda login button var ve bir adette password editi var bix password editi içine girilecek değeri bizim belirlediğimiz listeden rastgele seçilerek yapılamsını isitiyoruz bunu nasıl yapabiliriz şimdidden teşekkürler

function GeneratePassword(const n : Integer) : string;
const
  PossiblePasswordChars = 'ABCDEFGHIİJKLMNOÖPRSŞTUÜVYZabcdefghıijklmnoöprsştuüvyz1234567890!+%&@?-';
var
  s : string;
  i : Integer;
begin
  Randomize;
  s := '';
  for i:=1 to n do
    s := s + PossiblePasswordChars[Random(Length(PossiblePasswordChars))+1];
  Result := s;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := GeneratePassword(10);
end;