delphi başlığının içinde pascal sorusu olmaz biliyorum ama programcı abilerimin yardımına ihtiyacım var..
pascalda bi şifre programı yazmam gerekiyor.
şöyle olacak :
örn:pascal-apcsla
yani tek ve çift sıradakilerin yeri değişecek yapamıyorum yardım eder misiniz?
Form'a iki "edit" ve bir "button" koy,
edit1'de şifrelenecek yazı olmalıdır.
Butona basıldığında edit iki'de şifreli hali yer alır...
procedure TForm1.Button1Click(Sender: TObject);
var Str1,Str2,Str3,Str4,Str5:String;
Uz,i,j:Integer;
begin
Str1:=Edit1.Text;
Uz:=Length(Str1);
for i:=0 to uz do
begin
j:=((2*i)+1);
Str2:=Copy(Str1,j,2);
Str3:=Copy(Str2,1,1);
Str4:=Copy(Str2,2,1);
Str5:=Str5+Str4+Str3;
end;
Edit2.Text:=Str5;
end;
kısa bir not lütfen PASCAL' DA FORMMMMMMMMMMMMMMMMMMMM YOKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK
insanlar temeli öğrenmeden ev yapmaya başlarsa böyle olur.. yardım etmiyorum bilerek, çünkü sen bulki bir işe yarasın...
Sevgili "seandillon" anladım sen delphi ve pascal uzmanısın ama benim yazdığım kodların sadece procedure ismi Delphi formu içeriyor...Pascal kullanıcısı procedure'ü kendi tanımlar ya da sadece içini alabilir...
Yani kısaca o alması gereken kısmı biliyor...
Bu arada pascal da form olmadığı bilgisini verdiğin için sağol sen de olmasan bunu nerden öğrenecektim...