Linux Mint Türkiye

Yazılım => Yazılım Genel => Uygulama Geliştirme => Konuyu başlatan: Depresif - 28 Haziran 2017, 19:29:54

Başlık: Basit Sözlük Uygulaması Yapmak
Gönderen: Depresif - 28 Haziran 2017, 19:29:54
     Kişisel kullanımım için Mint üzerinde basit bir sözlük uygulaması yapmak istiyorum. Fakat konuya çok yabancıyım. Nereden başlamalı ve hangi yolları izlemeli ? Fikirlerinizi alalım.
Başlık: Ynt: Basit Sözlük Uygulaması Yapmak
Gönderen: kembağal - 03 Şubat 2018, 15:21:48
BaCon programlama dili ile yazılmış bir çevrimiçi sözlük örneği:

 (http://sozluk.net.in/yazilim/ingilizcesozluk.png)

INCLUDE "hug.bac"
INIT
a$="3"

SUB ara
     araB$=GRAB$(arama)
     araB2$=REPLACE$(araB$, " ", "%20")
     TEXT(arama, "")
     TEXT(EDIT_BOX, "")
     result$=EXEC$("curl -s 'http://sozluk.net.in/sorgu.php?&kelime= (http://sozluk.net.in/sorgu.php?&kelime)"&araB2$&"&arama=" & a$ & "'")
     TEXT(EDIT_BOX, result$)
END SUB

SUB dil_ing
     a$="3"
END SUB

SUB dil_tur
     a$="4"
END SUB

window = WINDOW("İngilizce Sözlük", 600, 400)

arama= ENTRY("", 200, 25)
ATTACH(window, arama, 200, 15)
CALLBACK(arama, ara)

dil1 = RADIO("İngilizce", 80, 25, 0)
ATTACH(window, dil1, 220, 50)
CALLBACK(dil1, dil_ing)

dil2 = RADIO("Türkçe", 80, 25, dil1)
ATTACH(window, dil2, 300, 50)
CALLBACK(dil2, dil_tur)

EDIT_BOX = EDIT(580, 300)
ATTACH(window, EDIT_BOX, 10, 80 )

DISPLAY