┌vod
Novinky
Autor
F.A.Q.


Equation Editor
MathType
Equation Magic
MathEdit
Pole v MS Word
AMath
Merlyn
MathWrite
MK Skript
Scientific Notebook
TeXaide

© Martin KRON╧┴K, 1999

AMath96

O programu

AMath96 je ╣ablona pro MS Word, obsahujφcφ makra a panely nßstroj∙, umo╛≥ujφcφ psanφ matematick²ch v²raz∙ bez pou╛itφ Equation Editoru. AMath je dφlem Marca Guillemota, kter² jej deklaruje jako freeware.
AMath vyu╛φvß pro psanφ rovnic pole ROVNICE ve Wordu (podrobnosti o polφch zde). Jeho v²hodou je snadnost pou╛itφ, mo╛nost snadno upravovat jednotlivΘ funkce. Naopak nev²hodou je nep°φli╣ dokonal² vzhled rovnic a pon∞kud omezenΘ mo╛nosti. Makra byla napsßna pro font Times New Roman 10pt a pro v²razn∞ odli╣nΘ velikosti pφsma neposkytujφ optimßlnφ v²sledky, pak je pot°eba zasßhnout do zdrojovΘho k≤du ve Visual Basicu.
Ovlßdßnφ je velice jednoduchΘ a popsanΘ v p°ilo╛enΘ nßpov∞d∞.

Obrßzky

Panel nßstroj∙

Tipy

  • Modrß tlaΦφtka zobrazujφ dialogovΘ okno, Φervenß vytvo°φ p°φslu╣n² matematick² v²raz z jednoho Φi dvou p°edchßzejφcφch slov.
  • Pro sprßvnou funkci v ΦeskΘ verzi je t°eba editovat makro zzzEq, kde je pot°eba nastavit nßzev pole na rovnice. Zde je v²pis funkΦnφho makra, kterΘ funguje m∞:
'ùùùùaMath96ùùùùùùùzzzEqùùùùùùùùùùùùùùRΘalisation Marc Guillemot

Sub MAIN
End Sub

'ùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùù
'indicates the code of the equation field e.g. "eq" for french or english versions of Word or "formel" for the german one

Function what$
WordLanguage$ = LCase$(AppInfo$(16))
If InStr(WordLanguage$, "franτais") Then
what$ = "eq"
ElseIf InStr(WordLanguage$, "english") Then
what$ = "eq"
ElseIf InStr(WordLanguage$, "deutsch") Then
what$ = "formel"
ElseIf InStr(WordLanguage$, "svenska") Then
what$ = "eq"
ElseIf InStr(WordLanguage$, "nederlands") Then
what$ = "vergelijk"
Else
what$ = "ROVNICE"
EndIf

'----> if the language your Word version isn't in the list above or if the given identifier is false, then simply erase the quote in the next line and indicate your equation field identifier
'what$ = "MyIdentifier"

End Function

'ùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùù
Function ListSeparator$
'This is the list separator defined in the international parameters
ListSeparator$ = AppInfo$(17)
End Function

  • TlaΦφtko se smajlφkem zobrazφ dialogovΘ okno ve kterΘm si m∙╛ete vybrat z dostupn²ch matematick²ch entit

Relevantnφ odkazy