ورود

View Full Version : سوال: مشکل این کد چیه؟



mohammadriano
یک شنبه 28 خرداد 1391, 01:35 صبح
procedure TForm6.Button1Click(Sender: TObject);
begin
edit1.Text = "my text";
end;

end.

چرا این کد error میگیره؟
میشه درستش رو بنویسید؟
این Delphi هم یه کم گنگ هستش ها!


نسخه دلفی RAD Studio XE Version 15.0.3890.34076

Ananas
یک شنبه 28 خرداد 1391, 02:16 صبح
بجای "..." از '...' استفاده کن.

mohammadriano
یک شنبه 28 خرداد 1391, 03:18 صبح
بجای "..." از '...' استفاده کن.
بازم Error می گیره

hossein_h62
یک شنبه 28 خرداد 1391, 08:09 صبح
بازم Error می گیره
یعنی اینجوری نوشتی بازم ارور داد ؟!!!!
procedure TForm6.Button1Click(Sender: TObject);
begin
edit1.Text := 'my text';
end;
یه بار دیگه امتحان کن دوست عزیز.

Felony
یک شنبه 28 خرداد 1391, 08:20 صبح
به جای = باید =: بزارید !

mohammadriano
یک شنبه 28 خرداد 1391, 21:54 عصر
1-میشه حلقه fOR و While و شرط If رو هم بگین؟
2-بعد یک سوال مگه پاسکال مثل جاوا از C مشتق نگرفته پس چرا فرقش اینقدر با C و جاوا زیاده؟

Ananas
یک شنبه 28 خرداد 1391, 23:00 عصر
1-میشه حلقه fOR و While و شرط If رو هم بگین؟
این مثالها کاربردی نیست فقط برای آشنایی با زبان برنامه نویسیه و مقایسه با زبان های دیگه :

procedure TForm1.FormCreate(Sender: TObject);
var
i, j: Integer;
s : string;
begin
for i := 0 to 100 do
s := IntToStr(i);
//---------------------
for i := 100 downto 0 do
s := IntToStr(i);
//---------------------
for i := 0 to 100 do
for j := 0 to 100 do
s := IntToStr(j + i * 100);
//---------------------
for i := 0 to 100 do
begin
for j := 100 downto 0 do
begin
s := s + ' ' + IntToStr(i) + ' ' + IntToStr(j);
end;
end;
//---------------------
i := 100;
while i > 0 do
begin
i := i - 1;
s := IntToStr(i);
end;
//---------------------
i := 0;
j := 5;
while ((i < 5) and (j > 0)) or (i <> j) do
begin
Inc(i);
Dec(j);
if i = 2 then
Break;
end;
end;



2-بعد یک سوال مگه پاسکال مثل جاوا از C مشتق نگرفته پس چرا فرقش اینقدر با C و جاوا زیاده؟
نه. فرق داره.