Çok eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz.. Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
C# ve File Association (Kendi Formatınız)
Selamun Aleyküm.
İlk önce File Association nedir ondan bahsedelim. Sözlük anlamı “Dosya İlişkilendirmesi” olan File Association , bilgisayarımızdaki farklı formatlardaki dosyaların, programlarla ilişkilendirilmesine denir. Yani bir program yazdınız...
var i:integer;
label gotolabel;
begin
for i:=0 to 20 do
begin
showmessage(‘i = ‘+inttostr(i));
if i=8 Then goto gotolabel
end;
Gotolabel:
showmessage(‘Sonuca gelindi’);
end;
var x:integer;
begin
form1.IBTable1.Active :=True;
for x:=0 to form1.IBTable1.RecordCount -1 do
begin
form1.ListBox1.Items.Add(form1.IBTable1Alan_Adı.Text);
form1.IBTable1.Next;
end;
end;
listbox Ondblclik olayınada yapmak istediğini yazabilirsin
Örn...
procedure TForm1.Button1Click(Sender: TObject);
var
vrs,vrs1:string;
begin
vrs:='1.1';
vrs1:=(IdHTTP1.Get('http://d_n_a.sitemynet.com/vrss.txt')); versiyon dosyasinin bulunmasi gerek txt dosyasi içinde 1.2 yaziyor yeni verdiyon oltugunda gidip deyiştirmeni gerek
if vrs>vrs1 then
begin...
genel mantık şu
1. 3. 5. 7. ve 9. rakamların toplamı * 7 den
2. 4. 6. 8. sıradaki rakamların toplamını çıkarıp
sonucun mod 10 ununu alıyoruz bu bize 10. karakteri veriyor
1 den 10. karaktere kadar olanları da toplayıp mod 10 ununu alınca 11. karakteri veriyor..
bizde daha sonra işlem...
Forma 2 tane image nesnesi ve bir tane de button ekleyin.
Procedure Highlight(aSource, ATarget: TBitmap; AColor: TColor);
Var
i, j: Integer;
s, t: pRGBTriple;
r, g, b: Byte;
cl: TColor;
Begin
cl:= ColorToRGB(AColor);
r:= GetRValue(cl);
g:= GetGValue(cl);
b:= GetBValue(cl)...
uses ShellAPI;
function MoveToRecycle(const sFileName: string): Boolean;
var
fos: TSHFileOpStruct;
begin
FillChar(fos, SizeOf(fos), 0);
with fos do
begin
wFunc := FO_DELETE;
pFrom := PChar(sFileName);
fFlags := FOF_ALLOWUNDO or FOF_NOCONFIRMATION or FOF_SILENT;
end;
Result := (0 =...
Daha önceki "Javascript Olaylar" dersinde, üzerine kod yazacağımız olayları görmüştük.Bu olaylar yaratıcı web tasarımcılar için yeterli değildir. Başka olaylar oluşturmak için event (olay) komutlarından yararlanılır. Olay komutlarının önüne event. kodu getirilir. Bu komutlar sadece IE...
JavaScript"te "ve" Operatörü: "&&" İçiçe deyim kullanmak da güzel bir yol ama daha kısa bir yolumuz var: Mantıksal İşlemler. Sayının hem 25"ten büyük olmasını, hem de 60"tan küçük olmasını istiyorsak ve anlamına gelen && mantıksal işlem işareti ile iki koşulu tek bir koşul ifadesi haline...
"while" Döngü Deyimi
Öğreneceğimiz ilk döngü deyimi: while (Türkçesi: öyleyken). Bu deyimin yapısı şöyledir:
while (koşul ifadesi) işlem
birden fazla işlem söz konusuysa,
while (koşul ifadesi)
{
İŞLEMLER
}
Bu deyimdeki koşul ifadesi sağlandığı sürece deyimdeki işlemler sürekli; bir...
"if… else…" Koşul Deyimi
İlk koşul deyimimiz: if…else… (Türkçesi: eğer öyleyse…değilse…). Yazılımda veriler değerlendirilirken bir yol ayrımına, elemeye gidilebilir. Mesela belli bir değerin altındakiler için başka işlemler, üstündekiler için başka işlemler yapılabilir. Verileri böyle bir...