سوال درمورد تابع lstrcat

[paria92]

سلام دوستان دوتا سوال دارم
1---------:) من این تابع رو نوشتم برای اینکه دوتا رشته رو به هم بچسبونم هیچ خطایی نمیده ولی جواب هم نمیده ممنون میشم از دوستانی که بتونن مشکلم رو حل کنن؟ایا ایراد در تعریف متغیر s هست؟


var
p:PChar;
q:PChar;
s:PChar ;
begin
p:='ali';
q:='reza';
s:= lstrcat(p,q);
edt1.text :=s;
end;
end.


2_________________)
برای تابع lstrcompباید چیکار کنم؟به همین صورت مانند تابع lstrcat????????????
3______________):
دوستان این کد رو برای اموزش اولیه برای تابع ischaralpha نوشتم ولی در هرصورت جواب ok میده حتی اگه داخل تکست باکسم عدد وارد کنم:


var
p:pchar;
begin
edt1.text:=p;
if ischaralpha(p) then showmessage('ok') else showmessage('no';
end;
end.

[Mask]

اینا چیه نوشتی؟
داری میگی رشته یعنی String پس اون Pchar چیه نوشتی؟فکر کنم داری راه رو کج میری.
از پستهایی که داری تو این چند روز میزاری ، میشه نتیجه گرفت تازه شروع کردی. پیشنهاد میکنم به جای این همه سوال ساده و پیش پا افتاده سعی کن ، یک کتاب اموزش دلفی یا فیلمها و مقالات اموزش دلفی که از پایه اموزش میدهند رو بگیری و ببینی و یا بخونی ، تا اکثر این سوالات و مشکلاتت حل بشود.
اینجوری 2 تا رشته رو به هم بچسبون.

var Str1: string;
Str2: string;
begin
Str1 := 'ali';
Str2 := 'reza';
Edit1.Text := Str1 + Str2;
end;